Browse Source

perl: Also strip begin, end and for pragmas

Signed-off-by: Marcel Denia <naoir@gmx.net>
lilik-openwrt-22.03
Marcel Denia 11 years ago
parent
commit
1549919b71
1 changed files with 2 additions and 2 deletions
  1. +2
    -2
      lang/perl/perlmod.mk

+ 2
- 2
lang/perl/perlmod.mk View File

@ -128,8 +128,8 @@ define perlmod/Install
@echo "---> Stripping modules in: $(strip $(1))$(PERL_SITELIB)" @echo "---> Stripping modules in: $(strip $(1))$(PERL_SITELIB)"
find $(strip $(1))$(PERL_SITELIB) -name \*.pm -or -name \*.pl | \ find $(strip $(1))$(PERL_SITELIB) -name \*.pm -or -name \*.pl | \
xargs -r sed -i \ xargs -r sed -i \
-e '/^=\(head\|pod\|item\|over\|back\|encoding\)/,/^=cut/d' \
-e '/^=\(head\|pod\|item\|over\|back\|encoding\)/,$$$$d' \
-e '/^=\(head\|pod\|item\|over\|back\|encoding\|begin\|end\|for\)/,/^=cut/d' \
-e '/^=\(head\|pod\|item\|over\|back\|encoding\|begin\|end\|for\)/,$$$$d' \
-e '/^#$$$$/d' \ -e '/^#$$$$/d' \
-e '/^#[^!"'"'"']/d' -e '/^#[^!"'"'"']/d'
endef endef


Loading…
Cancel
Save