Select Code to Download

#!/usr/bin/perl6
use v6;
...

say $Paul.id;
say $Paul.username;

class User is rw {
  has Int $.id;
  has Str $.username when not /admin|root/;
}