applescript内でperl実行 そんなことが出来る。 やってみました。 #! applescript --UpdateMailLabel --メールアドレスからラベルを判定し設定する --create date: 2009/08/20 auth:koizumi ver 1.0 property MAX_COUNT : 10000 --ループ最大値 tell applica…

#!/usr/local/bin/perl -w use strict; use warnings; use utf8; use JSON; my $obj = new Target('hounobouno'); # 変換対象インスタンス生成 my $json = new JSON; # JSONインスタンス生成 $json->convert_blessed; # blessedObjectが渡されたらTO_JSONを…