while () { chomp; if ($_ eq "quit") { exit; } print eval "$_", "\n"; }