in reply to Extracting a String after a String within a String . . .

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

[download]

In Section Seekers of Perl Wisdom