Skip to content

Instantly share code, notes, and snippets.

@samcv

samcv/gist:fce3ecdb5e8927d6a13092ed7b33f255 Secret

Created March 23, 2019 18:49
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save samcv/fce3ecdb5e8927d6a13092ed7b33f255 to your computer and use it in GitHub Desktop.
Save samcv/fce3ecdb5e8927d6a13092ed7b33f255 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
#! /usr/bin/env perl6
use nqp;
sub MAIN
{
say "Started as $*PID";
for ^5 -> $run {
say "Start run $run";
my $cmd = run « cat /home/samantha/Downloads/kubuntu-18.10-desktop-amd64.iso », :out;
$cmd.out.close;
say "End run $run";
nqp::force_gc();
sleep 1;
}
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment