found TOPLEVEL PPI::Token::Comment #!/usr/bin/env perl (line 1)
found TOPLEVEL PPI::Statement::Variable my $fb = fizzbuzz(); (line 3)
found TOPLEVEL PPI::Statement print "$_\n" for @$fb; (line 4)
found TOPLEVEL PPI::Statement::Sub sub fizzbuzz {
    my ($n, $m) = (1, 100);
    my @out;
    for my $num ($n .. $m) {
        my $line = '';
        $line .= 'fizz' if $num % 3 == 0;
        $line .= 'buzz' if $num % 5 == 0;
        push @out, $line || $num;
    }
    return \@out;
} (line 6)