{
$String=~$RegEx;
print "Match: ",$&||"none"," Pre: ",$`||"none"," Post: ",$'||"none","\n";
}
{
 eval $String=~$RegEx;
 print "Match: ",$&||"none"," Pre: ",$`||"none"," Post: ",$'||"none","\n";
}
{
 eval
 {
  $String=~$RegEx;
 };
 print "Match: ",$&||"none"," Pre: ",$`||"none"," Post: ",$'||"none","\n";
}