perl -MO=Terse -E'our $str; $str = $str . " ";'