In some cases probably more readable:

my $response = "\a site nao vulneravel!!!\n\n";
if ($resul =~ /xss/) {
    $response = "\a site vulneravel!!!\n\n";
}
[download]

A matter of taste.

Regards
McA