Help for this page
my $f = "/etc/fstab"; open ( my $fh, "<", $f ); ... print if (1..3) ; }
my $f = "/etc/fstab"; open ( my $fh, "<", $f ); ... while ( <$fh> ) { print if (1..3) ; }