#!perl -pl
$_=/ub/?8:eval$_.e2