Re: Init Caps Handler
Re: Init Caps Handler
- Subject: Re: Init Caps Handler
- From: Skeeve <email@hidden>
- Date: Tue, 20 Nov 2007 22:36:18 +0100
P.S. I forgot to tell you how to use them.
set ac to AllCaps for "this
is
a
test text"
and the handlers can even be simpler:
on InitialCaps for a_text
do shell script "perl -ne 'print ucfirst foreach split /\\b/'<<'" &
(ASCII character 3) & "'" & (ASCII character 10) & a_text
end InitialCaps
on AllCaps for a_text
do shell script "perl -ne 'print uc' <<'" & (ASCII character 3) &
"'" & (ASCII character 10) & a_text
end AllCaps
on NoCaps for a_text
do shell script "perl -ne 'print lc' <<'" & (ASCII character 3) &
"'" & (ASCII character 10) & a_text
end NoCaps
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden