So you took the code I gave you yesterday, broke it and didn't take the advice? Given your previous posts are more advanced than this does this mean that you simply did a copy and paste of code from elsewhere? If you are at all interested in learning the tool you've chosen to use, stop trying things at random, stop ignoring what Perl tells you, read the documentation: perlintro, tutorials, http://learn.perl.org.