variablen aus sub an andere sub übergeben - #120303 (Allgemeines zu Perl)

nepos

2009-04-06 08:13

User since
2005-08-17
1420 Artikel
BenutzerIn

Vergiss einfach den Mist mit globalen Variablen. Das ist unnoetig und fehleranfaellig!

Warum uebergibst du die Variablen nicht einfach beim Aufruf?

Code (perl): (dl )

sub on_public {
...
    if (   $line =~ /^!schreibwas/ ){
            output('blablub', $channel); # Wobei ich hier $channel und $line vertauschen wuerde.
    }
}

Und dann in output():

Code (perl): (dl )

sub output {
        my ($line, $channel) = @_;
        $self->privmsg( $channel, "$line" );
}