Hi,
On Tue, 5 Dec 2006, Randal L. Schwartz wrote:
> >>>>> "Uwe" == Uwe Kleine-Koenig <zeisberg@xxxxxxxxxxxxxxxxxxxxxxxxxx> writes:
>
> Uwe> #! /bin/sh
> Uwe> exec perl -i -p -e 's/\$(Id|Revision):.*?\$/\$$1: \$/' "$@";
>
> Ow. My eyes hurt from that. How about we rewrite that as a native Perl
> script:
>
> #!/usr/bin/perl
> $^I = ""; # this is -i
> while (<>) {
> s/\$(Id|Revision):.*?\$/\$$1: \$/;
> print;
> }
Hey, that's better! All of a sudden, I understand everything!
Not,
Dscho
-
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at http://vger.kernel.org/majordomo-info.html