fd=mopen('mfscanf.dat','r'); /// \sleftarrow{\normalfont opens a file in read mode}
mgetl(fd,2); /// \sleftarrow{\normalfont bypassing the first two lines}
[n,a,b,c]=mfscanf(-1,fd,'%[^,],%*[, ]%d%*[, ]%d\BS n');/// \sleftarrow {\begin{minipage}[t]{3cm}{\nf{}formatted read}\end{minipage}}
fd=mopen('mfscanf.dat','r');mgetl(fd,2);[n,a,b,c]=mfscanf(-1,fd,'%[^,],%*[, ]%d%*[, ]%d\n');  /// @@prerequisite
n       /// \sleftarrow{\normalfont number of read arguments}
stripblanks(a)' /// \sleftarrow{\normalfont removing spaces and tranposing string matrix}
[b,c]   /// \sleftarrow{\normalfont numerical values }
mclose(fd);/// \sleftarrow{\normalfont close the opened file stream}