Select Code to Download

Last   First   Phone   Bldg    Room    email
 
Use of uninitialized value in printf at PL.pl line 11, <FH> line 2.
...
Use of uninitialized value in printf at PL.pl line 11, <FH> line 11.
Use of uninitialized value in printf at PL.pl line 11, <FH> line 11.
                         cbest

Last   First   Phone   Bldg    Room    email
 
...
O'Lewis John.^M                          john
Le Much Bo Jo^M                          ed@a.nl
Abe-Jen Mar-Jo^M                         cbest

#!/opt/bin/perl -slw
use strict;
...
        printf '%7.7s %7.7s %7.7s ', <FH> =~ m[ ([^/]+) / (?:(\S+)\s+)
+? (\S+) $]x; 
        printf "%s\n",               <FH> =~ m[^(\S+)];
}