Lexical::select - provides a lexically scoped currently selected filehandle
version 0.10
use Lexical::select; open my $fh, '>', 'fubar' or die "Oh noes!\n"; { my $lxs = lselect $fh; print "Something wicked goes to \$fh \n"; } print "Back on STDOUT\n";
Changing the currently selected filehandle with select and changing it back to the previously selected filehandle can be slightly tedious. Wouldn't it be great to have something handle this boilerplate, especially in lexical scopes.
select
This is where Lexical::select comes in.
Lexical::select provides the lselect function. As demonstrated in the SYNOPSIS, lselect will change the currently selected filehandle to the filehandle of your choice for the duration of the enclosing lexical scope.
lselect
SYNOPSIS
It should be noted that the duration of the selected filehandle is limited to the lexical scope, not the effects of the selected filehandle.
Functions exported by default.
Takes one parameter, a filehandle that will become the currently selected filehandle for the duration of the enclosing scope.
filehandle
Returns an object, which provides the restore method.
restore
You can then either restore the currently selected filehandle back manually or let the object fall out of scope, which automagically restores.
Explicitly restores the currently selected filehandle back to the original filehandle. This is called automagically when the object is DESTROYed, for instance when the object goes out of scope.
DESTROY
SelectSaver
Chris Williams <chris@bingosnet.co.uk>
This software is copyright (c) 2014 by Chris Williams.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Lexical::select, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Lexical::select
CPAN shell
perl -MCPAN -e shell install Lexical::select
For more information on module installation, please visit the detailed CPAN module installation guide.