I expected the code will print nothing. But, it's not.
$a = 10; @a = qw(1 2 3); *b=*a; undef *a; print @b; [download]
How this prints the output as 1 2 3?
In reply to Tell me how it works! by nagalenoj