Opened by Gast at 2005-04-26 19:31
User since
2003-11-28
3645 Artikel
ModeratorIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-11-28
3645 Artikel
ModeratorIn
Ich missbrauche gerne Getopt::Long fuer eine cmdline-aehnliche Parameterebergabe. Damit hat man auch gleich die Sicherheit, dass keine falschen Optionen verwendet wurden und man kann den Typ der Option angeben (Integer, String, Boolean).
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
use Getopt::Long;
sub my_sub {
local @ARGV = @_;
my %args;
GetOptions(\%args, "name=s", "alter=i") or die "wrong usage!";
for my $key ( sort keys %args ) {
print "$key = $args{$key}\n";
}
return 1;
}
my_sub(-name => "ich", -alter => 19);