Opened by _Sietsch_ at 2005-07-28 12:19
User since
2005-01-17
14745 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14745 Artikel
Admin1
Beispiel:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#!/usr/bin/perl
use strict;
use warnings;
my $arg;
if (@ARGV) {
$arg = join('#', @ARGV);
}
else {
$arg = <STDIN>;
chomp($arg);
}
print "\nArgumente sind: $arg\n";
1;