[quote=docsnyder,27.07.2007, 11:20]@renee

Getopt::Long ist schon in Ordnung, aber für "einfache" Optionen tut's auch folgendes:

Quote

map { $opts{$_} = 1 if ( $_ =~ m(^-) ) } @ARGV;

if ( defined($opts{-s}) ) {
doSomething();
}

Ist bei vielen Optionen sogar weniger Code ;)

Gruß, Doc[/quote]
pfui map im void-Kontext ;)

Dein Code ist aber nur wirklich hilfreich wenn es einfache Flags sind. Sobald die Parameter auch Strings oder so als Wert haben können, klappt es nicht mehr so gut... Bei Getopt::Long muss man aber nur ein "=s" oder "=n" ... an den Parameternamen hängen (in der GetOptions-Methode).