Thread perlfaq 5 - slurp (16 answers)
Opened by Schlumpf at 2009-09-11 10:54

Gast Schlumpf
 2009-09-16 10:52
#125850 #125850
Wenn man den Titel berücksichtig ( How do I change, delete, or insert a line in a file, or append to the beginning of a file? ), könnte es so gemeint sein?

Code (perl): (dl )
1
2
3
4
5
my @lines = do { local $/; <$in> }; # slurp!

my $new_first_line = "My new first line.\n";

unshift @lines, $new_first_line;

View full thread perlfaq 5 - slurp