This code won't work on later versions of perl. split used to output the splitted data to @_ in v5.10 and earlier when called in scalar or void context. Starting with v5.12 (or maybe some subversion of v5.10, I didn't check that far) you'll have to write @_ = split /,/ explicitly, or even better, use another variable than @_ because of its special meaning in perl.