On Sun, Jul 09, 2000 at 05:06:12AM -0700, Chmouel Boudjnah wrote:
> > #!/usr/bin/perl
>
> [...]
>
> player play again :
>
> #!/usr/bin/perl
> while (<>) {
> s@[/]?(usr|%{[_]?prefix})/bin@%{_bindir}@g;
> s@[/]?(usr|%{[_]?prefix})/man@%{_mandir}@g;
> s@[/]?(usr|%{[_]?prefix})/sbin@%{_sbindir}@g;
> s@[/]?(usr|%{[_]?prefix})/etc@%{_sysconfdir}@g;
> s@[/]?(usr|%{[_]?prefix})/lib@%{_libdir}@g;
> s@[/]?(usr|%{[_]?prefix})/include@%{_includedir}@g;
> s@[/]?(usr|%{[_]?prefix})/info@%{_infodir}@g;
s@[/]?(usr|%{[_]?prefix})/libexec@%{_libexecdir}@g;
> print;
> }
>
> using like perl script.pl < file.spec > filenew.spec
Can't forget _libexedir... =)
--
[EMAIL PROTECTED], OpenPGP key available on www.keyserver.net
Freezer Burn BBS: telnet://bbs.freezer-burn.org . ICQ: 54924721
Webmaster for the Linux Portal Site Freezer Burn: http://www.freezer-burn.org
Current Linux uptime: 0 hours 22 minutes.
