diff options
| author | Sven Eisenhauer <sven@sven-eisenhauer.net> | 2023-11-10 15:11:48 +0100 |
|---|---|---|
| committer | Sven Eisenhauer <sven@sven-eisenhauer.net> | 2023-11-10 15:11:48 +0100 |
| commit | 33613a85afc4b1481367fbe92a17ee59c240250b (patch) | |
| tree | 670b842326116b376b505ec2263878912fca97e2 /Bachelor/Systemprogrammierung in Perl/examples/example1b.pl | |
| download | Studium-33613a85afc4b1481367fbe92a17ee59c240250b.tar.gz Studium-33613a85afc4b1481367fbe92a17ee59c240250b.tar.bz2 | |
Diffstat (limited to 'Bachelor/Systemprogrammierung in Perl/examples/example1b.pl')
| -rw-r--r-- | Bachelor/Systemprogrammierung in Perl/examples/example1b.pl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/Bachelor/Systemprogrammierung in Perl/examples/example1b.pl b/Bachelor/Systemprogrammierung in Perl/examples/example1b.pl new file mode 100644 index 0000000..e53ed1f --- /dev/null +++ b/Bachelor/Systemprogrammierung in Perl/examples/example1b.pl @@ -0,0 +1,12 @@ +#!/Perl/bin/perl
+use strict;
+use warnings;
+
+my $name;
+
+print "Wie heißen Sie? ";
+$name = <STDIN>;
+chomp $name;
+print "Hallo $name! \n";
+print "hello world\n";
+
|