my $calc="1+2"; print eval ($calc) ."\n";