#!usr/bin/perl -w

##</code><code>##

Useless use of anonymous list ([]) in void context at noname.pl line 10.
Useless use of anonymous list ([]) in void context at noname.pl line 10.