Help for this page
$self->{tempfile} = File::Temp->new(UNLINK => 1, SUFFIX => '.tmp'); print $self->{tempfile} "I am here";
$self->tempfile( File::Temp->new(UNLINK => 1, SUFFIX => '.tmp') ); print {$self->tempfile} "I am here";
package test; # not 'test.pm' use Moose; ... my $self = shift; print { $self->tempfile } "I am here"; }
www.com | www.net | www.org
No recent polls found