$User_Name = " joe's name here ";


##</code><code>##

$User_Name= "'"  .   $User_Name     .  "'";


##</code><code>##

$User_Name =~ s/[^a-zA-Z0-9]//g;