#! /usr/bin/env perl6

sub increment ($value is copy)
{
  $value++;
  return $value;
}

say increment(12);