in reply to issue with the global variable.
You might consider do as a shortcut for the open, readline, and eval that you're using. It will do all of that for you. :-)
Update: Er, yeah, as rodion pointed out (Re: issue with the global variable.), the name and content of your @attack_client_info variable is rather suspicious.
In Section
Seekers of Perl Wisdom