Re: Shell-Perl-AppleScript scripting

• Subject: Re: Shell-Perl-AppleScript scripting
• From: John Fowler <email@hidden>
• Date: Mon, 29 Dec 2003 07:36:53 -0600

#!/usr/bin/perl
BEGIN {
chomp($ARGV [0] = <<'UnLiKeLyStRiNg');
your search string goes here, as is
UnLiKeLyStRiNg
chomp($ARGV [1] = <<'UnLiKeLyStRiNg');
your replace string goes here, as is
UnLiKeLyStRiNg
}
s/$ARGV [0]/$ARGV [1]/g;

save this to /path to myscript/Content/Resources/searchreplace.pl
Add something like this to the beginning of your script
set PathToMe to path to me as text
set PathToMeToo to (quoted form of POSIX path of PathToMe) as text
set PathToResources to PathToMeToo & "/Contents/Resources/"
call the perl script with
do shell script PathToResources & "your arguments"

Does this make any sense?

• Prev by Date: Re: [OT] Verification required?
• Next by Date: Re: Shell-Perl-AppleScript scripting
• Previous by thread: Re: Shell-Perl-AppleScript scripting
• Next by thread: Re: Shell-Perl-AppleScript scripting
• Index(es):
  • Date
  • Thread