perl -ple"s[sub\s+(?=\w)][sub XXX_]g" yourscript.pl >junk.pl
Run junk.pl and correct each Undefined subroutine &..... called at ... by removing the XXX_ from the subroutine declarations. Once the script runs again, any sub definitions still carrying the XXX_ prefix are redundant and can safely be removed from yourscript.pl
In reply to Re: Cleaning up unused subroutines
by BrowserUk
in thread Cleaning up unused subroutines
by koknat
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |