sub afork (@$&) {
[download]

Your prototype does not do what you seem to think it is doing.    From Prototypes: Any unbackslashed "@" or "%" eats all remaining arguments, and forces list context. so it is the same as if you had not used a prototype at all (which you really shouldn't be using anyways.)