Perl Experts:
open(INFILE, $filename) or die("Cannot read input file: $!");
#How can I use this while loop to scan/read numbers from three lines and #find the smallest number ?
while ( <INFILE> ) {
@words = split();
last;
}
open(INFILE, $filename) or die("Cannot read input file: $!");
#How can I use this while loop to scan/read numbers from three lines and #find the smallest number ?
while ( <INFILE> ) {
@words = split();
last;
}
Comment