2009-12-21T20:12:59 pktm

Aber dann braucht man ja 2 Zeilen :)
Außerdem sieht das noch unschöner aus, wenn es irgendwo zwischen 5 eingelesenen Argumenten verteilt ist.

1
2
3
4
5
6
7
8
9
10
11

use Carp;
...
sub foosub {
    my ($i, $x, $foo) = @_;

    croak "first argument must be positive" unless $i > 0;
    croak "too few arguments" unless defined $foo;
    
    # now start doing something
    ...
}

Quote

Daher die Frage, ob man das noch irgendwie anders lösen kann. Perl ist ja dafür bekannt, mehrere Wege anzubieten.