add new repoHEADmaster

1 files changed, 20 insertions, 0 deletions

diff --git a/Bachelor/Systemprogrammierung in Perl/examples/hello4.pl b/Bachelor/Systemprogrammierung in Perl/examples/hello4.pl
new file mode 100644
index 0000000..3631821
--- /dev/null
+++ b/Bachelor/Systemprogrammierung in Perl/examples/hello4.pl
@@ -0,0 +1,20 @@
+#!/Perl/bin/perl

+

+use strict;

+use warnings;

+

+my ($hugo, $otto);

+

+$hugo = "hello";

+$otto = "world";

+

+# Ausgabe eines Textes bis ein einzelnes END am Zeilenanfang steht

+

+print <<LST;

+Dies ist ein längerer Text

+in den wir ein $hugo 

+und dann später ein $otto

+eingefügt haben

+LST

+

+    exit;