perl -e " my $x = 15; print map {$_.' = '.eval eval{$_} } '$x' " $x = 15