Why use shell when you can pipe stuff using “run”?

longoutput

#!/bin/bash
i=0
while :; do
  echo "hello! $i"
  ((i % 100 == 0)) && beep
  ((i++))
done

more6.p6

#!/usr/bin/env perl6
my $out = run(‘./longoutput’, :out).out;
run(‘less’, :in($out));
say ‘Finished!’;