Changeset 3011 for trunk/packages/invirt-console/debian/invirt-console-host.prerm

Timestamp:

May 27, 2010, 11:58:35 AM (14 years ago)

Author:

broder

Message:

Use the .. Perl operator to simplify prerms.

invirt-console-host, invirt-dev, and all of the packages in
xvm-munin-config previously used a convoluted one-liner to clean up
/etc/sudoers, but we can do it much more easily using the .. operator.

Taken from ​http://blog.ksplice.com/2010/05/top-10-perl-one-liner-tricks/

File:

• trunk/packages/invirt-console/debian/invirt-console-host.prerm (modified) (1 diff)

trunk/packages/invirt-console/debian/invirt-console-host.prerm

@@ -20 +20 @@
 case "$1" in
     remove|upgrade|deconfigure)
-        perl -i.bak -ne 's%^### (BEGIN|END) invirt-console-host\s*$%%m && ($skip = ($1 eq "BEGIN")); print unless $skip;' /etc/sudoers
+        perl -i.bak -ne 'print unless /^### BEGIN invirt-console-host/../^### END invirt-console-host/' /etc/sudoers
     ;;