Reading from the Filehandle : file read « File « Perl
- Perl
- File
- file read
Reading from the Filehandle
#!/usr/bin/perl
open(FILE, "data.txt") || die "Can't open data.txt: $!\n";
while(<FILE>) {
print if /A/;
}
close(FILE);
Related examples in the same category