perl -E "my $num=\"33\"; say \"$num\".'0';" 330