diff options
Diffstat (limited to 'luftballons.pl')
-rw-r--r-- | luftballons.pl | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/luftballons.pl b/luftballons.pl new file mode 100644 index 0000000..a6937f9 --- /dev/null +++ b/luftballons.pl @@ -0,0 +1,22 @@ +#!/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"; }
\ No newline at end of file |