Why not adopt me?
NAME
File::Macro - Read a file within a block scope
VERSION
Version 0.01
SYNOPSIS
This module exists exclusively to provide a shorthand for the open... or die
idiom. Instead of repeating the same boilerplate, you simply call with_file
and do whatever you need to do with your file inside the block, which is already opened for you in $_
.
If you want to use a different variable for the filehandle, just specify it after the mode selector, like so:
my
$fh
;
with_file
'foo.csv'
=>
'<'
=> \
$fh
=>
sub
{
say
<
$fh
>;
};
EXPORT
Exports only with_file
.
SUBROUTINES/METHODS
with_file $file_name => [ $file_mode => ] sub { }
Opens file C<
$file_name
> in mode C<
$file_mode
>
for
reading, assigns the
filehandle to C<
$_
>. Once the function in the second argument is complete,
perl closes the filehandle automatically.
The C<
$file_mode
> defaults to C<< < >>, that is to
say
, reading.
You can also pass in a reference to your own file handle as follows:
with_file(
't/01-base.t'
,
'<'
, \
$my_fh
,
sub
{
say
<
$my_fh
>;
} );
AUTHOR
Jeff Goff, <jgoff at cpan.org>
BUGS
Please report any bugs or feature requests to bug-file-macro at rt.cpan.org
, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=File-Macro. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc File::Macro
You can also look for information at:
RT: CPAN's request tracker (report bugs here)
AnnoCPAN: Annotated CPAN documentation
CPAN Ratings
Search CPAN
ACKNOWLEDGEMENTS
LICENSE AND COPYRIGHT
Copyright 2014 Jeff Goff.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.