of application OmniGraffle
make new shape at beginning of graphics with properties
{text:{alignment:left, text:Square}, origin:{20, 20}, size:{150, 20}}
end tell
With that in mind, this works for me:
#!/usr/local/bin/perl
use strict;
use Mac::Glue ':all';
my $OmniGraffle = new Mac::Glue
on the following but I'm still lost. I've also looked through
the archives for an example of a $obj-make but all the examples appear
to be aimed at retrieving data rather than creating 'things'.
use Mac::Glue;
my $OmniGraffle = new Mac::Glue 'OmniGraffle';
my $chart = $OmniGraffle-obj(document = 1, page = 1