[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

RE: [MacPerl] Glue Question



At 16:20 -0700 1999.09.16, Branick, Robert  BGI SF wrote:
>#!perl -wluse Mac::Glue ':all';use strict;my $obj = new Mac::Glue
>'DeltaGraph';my $data_file = $obj->obj(file => "Mercatone Uno:Desktop
>Folder:Buying
>Trends.txt");my $output_file = $obj->obj(file => "Mercatone Uno:Desktop
>Folder:output.jpg");$obj->data("Blah", as_type => enum('tab_delimited'),
>from_file =>
>$data_file);	die $^E if $^E;$obj->plot_options(colorstyle =>
>enum('default_color'), text_font =>
>"Palatino", text_size => 18);die $^E if $^E;$obj->output(enum('jpeg'),
>to_file => $output_file);die $^E if $^E;$obj->plot_chart("Column -
>Depth");die $^E if $^E;$obj->quit;die $^E if $^E;__END__

I don't know what happened, but your mailer screwed up the newlines in your
script.

-- 
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org