Select Code to Download

package mdlno;
use strict;
...
    $param //= 'World';
    return 'Hello ' . $param;
}

use strict;
use warnings;
...
$mdlno::param = 'and goodbye';
$rtn = mdlno->main();
is $rtn, 'Hello and goodbye', 'Works with parameter';