Help for this page

Select Code to Download

Select or download this

sub getIntensity {
    my $target = shift; # => $_[0], idiomatic
...
    }
    $intensity;
}