C:\temp>perl -e "$@='all your base are belong to us';for (2,2) {print;warn}"
all your base are belong to us  ...caught at -e line 1.
all your base are belong to us  ...caught       ...caught at -e line 1.
21