Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
13 lines (8 sloc) 200 Bytes
#! /Users/damian/bin/rakudo'
use v6;
use IO::Prompter;
while prompt("Weight:", :number, :default(42),
:must({'be greater than 0' => {$_ > 0}})
) -> $input {
say "Got [$input]";
}