RosettaCodeData/Task/Topic-variable/Perl-6/topic-variable.pl6

given 3 {
    .say for $_**2, .sqrt;
}