2012/10/21 Ilya Chesnokov <[email protected]>: > я: perl -E 'say shift =~ s/([^.]+)/uc($1)/er' "hi, i'm robot. glad to see you" > HI, I'M ROBOT. glad to see you
А если ввод с STDIN, можно и погольфить :) % echo "hi, i'm robot. glad to see you" | perl -ple's/([^.]+)/uc$1/e' HI, I'M ROBOT. glad to see you Так хотелось вот такое замутякать: % echo "hi, i'm robot. glad to see you" | perl -F\\. -aple'$"="\E.";$_="\U@F"' HI, I'M ROBOT. GLAD TO SEE YOU Но не завелось ;( -- Varyanick I. Alex skype: cono.. [email protected] -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
