Line printer
my $lp = open '/dev/lp0', :w;
$lp.say: 'Hello World!';
$lp.close;given open '/dev/lp0', :w {
.say: 'Hello World!';
.close;
}Last updated
my $lp = open '/dev/lp0', :w;
$lp.say: 'Hello World!';
$lp.close;given open '/dev/lp0', :w {
.say: 'Hello World!';
.close;
}Last updated