use IO::All;
# Let the madness begin...
# Some of the many ways to read a whole file into a scalar
io('file.txt') > $contents;
# Overloaded "arrow"
$contents < io 'file.txt';
# Flipped but same operation
$io = io 'file.txt';
# Create a new IO::All object
$contents = $$io;
# Overloaded scalar dereference $contents =
$io->all;
# A method to read everything
$contents = $io->slurp;
# Another method for that
$contents = join '', $io->getlines;
# Join the separate lines
$contents = join '', map "$_\n", @$io;
# Same. Overloaded array deref
$io->tie;
# Tie the object as a handle
$contents = join '', <$io>;
# And use it in builtins # and the list goes on ...
Super neat lib.
