package Mac::AppleScript; require 5.005_62; use strict; use
warnings; require Exporter; require DynaLoader; use AutoLoader
qw(AUTOLOAD); our @ISA = qw(Exporter DynaLoader); # Items to
export into callers namespace by default. Note: do not export #
names by default without a very good reason. Use EXPORT_OK
instead. # Do not simply export all your public
functions/methods/constants. # This allows declaration use
Mac::AppleScript ':all'; # If you do not need this, moving
things directly into @EXPORT or @EXPORT_OK # will save memory.
our %EXPORT_TAGS = ( 'all' => [ qw( &RunAppleScript ) ] ); our
@EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); our @EXPORT = qw( );
our $VERSION = '0.04'; bootstrap Mac::AppleScript $VERSION; #
Preloaded methods go here. # Autoload methods go after =cut, and
are processed by the autosplit program. 1; __END__ =head1 NAME
Mac::AppleScript - Perl extension to execute applescript
commands on OS X =head1 SYNOPSIS use Mac::AppleScript
qw(RunAppleScript); RunAppleScript(qq(tell application "Find