$seperate = $1 if $aturl =~ /\Q$myuser\E(.*)/i;