$exp="\/\^DMSC0022\\s+\\S+\\s+(\\w+)\$/";
$str="Logfile_Connection_Lost Hostname: $1";
$_="DMSC0022 X10 oswald";
if (eval $exp) {
   eval(print "$str\n");
}