mirror of
https://git.adityakumar.xyz/fphw.git
synced 2024-11-12 16:09:45 +00:00
22 lines
No EOL
278 B
Perl
22 lines
No EOL
278 B
Perl
#!/usr/bin/perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
for (1..99) { print $_." Luftballons\n"; }
|
|
|
|
# This is a commented line
|
|
|
|
my $string = "Hello World!";
|
|
|
|
print $string."\n\n";
|
|
|
|
$string =~ s/Hello/Goodbye Cruel/;
|
|
|
|
print $string."\n\n";
|
|
|
|
finale();
|
|
|
|
exit;
|
|
|
|
sub finale { print "Fin.\n"; } |