- or download this
sub MY::makefile { return "# removed" }
- or download this
package MY;
sub c_o {
...
$inherited =~ s/old text/new text/;
$inherited;
}
- or download this
sub MY::c_o {
...
return $inherited_text; # a return of a scalar whose value is jus
+t a
# (probably multi-line) string.
}