develooper Front page | perl.perl5.porters | Postings from March 2000

format glitch

From:
Tom Christiansen
Date:
March 20, 2000 10:49
Subject:
format glitch
Message ID:
2949.953578139@chthon
Yes, I'm wicked.  I know that.  But watch:

    use warnings;
    my $i = 0;

    format Testing =
    Can you read this? @*
    ++$i
    .

    local $~ = *Testing{FORMLINE};
    write;

Produces this:

    Use of uninitialized value in scalar assignment at /tmp/s1 line 9.
    Undefined format "main::" called at /tmp/s1 line 10.

I'm not used to being warned about undef in an assignment
like this.  And well, that's a funny format name. :-)

--tom



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About