{ open my $fh, '>', 'filename.ext'; print $fh 'foo'; close $fh; }; { open my $fh, '<', 'filename.ext'; while (<$fh>) { # $_ }; close $fh; };
In reply to Re^2: Open/Save
by Anonymous Monk
in thread Open/Save
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |