Geltungsbereiche - #116690 (Allgemeines zu Perl)

MatthiasW

2008-11-28 14:02

User since
2008-01-27
367 Artikel
BenutzerIn
[default_avatar]

Möchtest du in test() eine eigene Variable $var haben, dann musst du sie mit my deklarieren.
Genauso funktioniert das auch mit allen anderen Gültigkeitsbereichen:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;

{
    my $var = 1;
    {
        print $var;
        my $var = 2;
        print $var;
    }
    print $var;
}

Gibt 121 aus.

MfG

perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'