Don't do that, instead use

sub AboutBPP {
   my $MW = shift;
....
[download]