Re: Setting AS Var to Perl Result
Re: Setting AS Var to Perl Result
- Subject: Re: Setting AS Var to Perl Result
- From: Skeeve <email@hidden>
- Date: Mon, 29 Nov 2010 21:47:02 +0100
Am 29.11.10 17:23, schrieb Marconi:
/path/to/the/contained/perl/script /path/to/the/dropped/data/file.txt
name_of_datum_to_extract
set the_result to do shell script "perl -e " & quoted form of("
my datumname=pop @ARGV;
$datumname= qr/^\\s*$datumname\\s*:\\s*(.*?)\\s*$/;
while (<>) {
print qq:$1\\n: if /$datumname/;
}
") & " " & quoted form of (filename) & " " & quoted form of (datumname)
_______________________________________________
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