File realperl.patch of Package perl-Regexp-Assemble

Index: Regexp-Assemble-0.35/eg/fee
===================================================================
--- Regexp-Assemble-0.35.orig/eg/fee	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/fee	2011-05-26 10:29:06.136862523 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 
 use strict;
 use Regexp::Assemble;
Index: Regexp-Assemble-0.35/eg/hostmatch/hostmatch
===================================================================
--- Regexp-Assemble-0.35.orig/eg/hostmatch/hostmatch	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/hostmatch/hostmatch	2011-05-26 10:29:06.127863375 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 #
 # hostmatch -- determine whether a DNS hostname matches a regular expression
 #
Index: Regexp-Assemble-0.35/eg/ircwatcher
===================================================================
--- Regexp-Assemble-0.35.orig/eg/ircwatcher	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/ircwatcher	2011-05-26 10:29:06.123863752 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 #
 # ircwatcher - watch an IRC stream and do things when
 #              interesting things occur
Index: Regexp-Assemble-0.35/eg/naive
===================================================================
--- Regexp-Assemble-0.35.orig/eg/naive	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/naive	2011-05-26 10:29:06.132862900 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 #
 # naive - generate a regular expression that will lex regular expressions
 # it is naive in the sense that it can't lex certain patterns, such as a
Index: Regexp-Assemble-0.35/eg/roman
===================================================================
--- Regexp-Assemble-0.35.orig/eg/roman	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/roman	2011-05-26 10:29:06.129863185 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 #
 # roman - generate a regular expression that matches the roman numerals
 # from 1 to 20.
Index: Regexp-Assemble-0.35/eg/stress-test.pl
===================================================================
--- Regexp-Assemble-0.35.orig/eg/stress-test.pl	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/stress-test.pl	2011-05-26 10:29:06.134862711 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 
 use strict;
 use lib 'blib/lib';
Index: Regexp-Assemble-0.35/eg/tld
===================================================================
--- Regexp-Assemble-0.35.orig/eg/tld	2008-06-06 20:33:06.000000000 +0200
+++ Regexp-Assemble-0.35/eg/tld	2011-05-26 10:29:06.125863563 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl -w
 #
 # tld - generate a regular expression that matches the Internet
 #       top level domains
Index: Regexp-Assemble-0.35/eg/track-5.10
===================================================================
--- Regexp-Assemble-0.35.orig/eg/track-5.10	2008-06-07 12:07:57.000000000 +0200
+++ Regexp-Assemble-0.35/eg/track-5.10	2011-05-26 10:30:20.095864935 +0200
@@ -1,4 +1,4 @@
-#! /usr/local/bin/perl5.9.5
+#! /usr/bin/perl
 
 use strict;
 use warnings;