IO::All::Temp - Temporary File Support for IO::All

IO-All documentation

Contained in the IO-All distribution.

Index

NAME
SYNOPSIS
DESCRIPTION
AUTHOR
COPYRIGHT

Code Index:

package IO::All::Temp
- temp
EOF

NAME

IO::All::Temp - Temporary File Support for IO::All

SYNOPSIS

See IO::All.

DESCRIPTION

AUTHOR

Ingy döt Net <ingy@cpan.org>

COPYRIGHT

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html

IO-All documentation

Contained in the IO-All distribution.

package IO::All::Temp;
use strict;
use warnings;
use IO::All::File -base;

sub temp {
    my $self = shift;
    bless $self, __PACKAGE__;
    my $temp_file = IO::File::new_tmpfile()
      or $self->throw("Can't create temporary file");
    $self->io_handle($temp_file);
    $self->error_check;
    $self->autoclose(0);
    $self->is_open(1);
    return $self;
}

1;