SPUG: printing reports

[Colin Meyer]

Hi Walter,

On Fri, Feb 08, 2002 at 12:53:03PM -0700, North, Walter wrote:
> 
> I use the following to define the format for each data file.
> 
> Use IO::Handle;
> open PRTFILE, ">>$PRTFILE" or die "blah blah\n";
> If ($TYPE eq "A") {
> PRTFILE->format_name("APRTFILE");
> PRTFILE->format_top_name("APRTFILE_TOP");

...

In order to be able to use the method calls from IO::File, you need to 
use an IO::File object instead of the traditional Perl FILEHANDLE.

Try something like:

  use IO::Handle;
  my $prtfile = IO::File->new; # creating the IO::File object
  $prtfile->open(">>$PRTFILE") or die "...";
  $prtfile->format_name("...");
  # ...

You may want to read the IO::Handle and IO::File perldoc pages for more
info.

Have fun,
-C.


 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
      Subscriptions; Email to majordomo at pm.org:  ACTION  LIST  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
 For daily traffic, use spug-list for LIST ;  for weekly, spug-list-digest
     Seattle Perl Users Group (SPUG) Home Page: http://seattleperl.org