It means you don't understand Perl. What part of it doesn't make sense to you? The my()? The $data? The =? The @_?
Try reading some documentation.
_____________________________________________________
Jeff[japhy]Pinyan:
Perl,
regex,
and perlhacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;