#!/usr/bin/env perl use strict; use warnings; use 5.010; say 'hello'; say 'I need a rest. Sleeping...'; sleep 10; #### open (my $INFILE, '2perl.pl |') or die "couldn't start program: $!"; while (<$INFILE>) { print; } close $INFILE;