SPUG: Eval Question

[Asim Jalis]

Why doesn't this work? 

#!/usr/bin/perl

my $y ; 
my $x = "$y = &length(q{hello world});" ; 
eval $x ; 
print "[$y]\n" ;

The output of this is 

[]

Why isn't $y assigned a numeric value?


Asim

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
 Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
 SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
        Email to majordomo at pm.org: ACTION spug-list your_address