my $email = $user . '@location.wtf';

##</code><code>##

my $email = "$user\@location.wtf";

##</code><code>##

my $email = qs($user@location.wtf);  # ?