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