#$url = substr($test, 0, $_);
#if ($test =~ /$url/ {