The critical difference:

($a,$b) = chop($c='hello'); # $b
($a, b) = chop($c='hello'); # just b -> hang
[download]

Please try the second and let me know what happens.