for my $var ( @{ guard_last(@array,my $last) } ) { say "IS LAST" if $last; say $var; }