How can i get a block command to block a person that tries to block me? i tried the code bellow but that didnt block me any ideas?

Code:

sub block<br />{ <br />    my ($bot, $self, $user, $msg) = @_;<br />   if($msg eq 'jt@bosky.x-host.uni.cc') <br />   {<br />       return "GO AWAY";  <br />   }<br />    if (length $msg)<br />    {<br />        $bot->{msn}->block($msg);<br />        return "$msg has been blocked.";<br />   } else {<br />        return "Incorrect usage.";<br />    }<br />}