Fupio is the easiest way to share online Learn more »

Lobsters: Newest Comments

You don't need to learn it all at once.
Start with something simple, e.g. printing a file line by line:

while (my $line = <>) {
    print $line;
}

Then replace all 'a' by 'b':

while (my $line = <>) {
    s/a/b/g;       # g: all occurences
    print $line;
}