printf "alfa\nwhatever" | perl -CSDA -n -e '// or die "not possible! -- $_ --"; /alfa/;'