if ($desc =~ /;FTP : /)

##</code><code>##

if (index ($desc, ';FTP : ') > -1)