Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 13 lines (10 sloc) 0.262 kb
1 2 3 4 5 6 7 8 9 10 11 12
BEGIN {$^W = 1}
use strict;
use IO::All;

# Copy STDIN to a String File one paragraph at a time
my $stdin = io('-');
my $string_out = io('$');
while (my $paragraph = $stdin->getline('')) {
    $string_out->print($paragraph);
}

print ${$string_out->string_ref};
Something went wrong with that request. Please try again.