Help for this page
my $s = 'The quick brown fox jumps over the lazy dog'; print ${ \substr($s, $_, 1) } for 0 .. length($s)-1; # Output The quick brown fox jumps over the lazy dog
my @refs; push @r, \substr($s, $_, 1) for 0 .. length($s) -1; print $$_ for @refs; # Output ggggggggggggggggggggggggggggggggggggggggggg
print @refs; # Output LVALUE(0x1bd5270) LVALUE(0x1bd5270) LVALUE(0x1bd5270) LVALUE(0x1bd5270 +) LVALUE(0x1bd5270) LVALUE(0x1bd5270) ...
www.com | www.net | www.org
No recent polls found