[Prev][Next][Index]
RE: General: SVGA & X11
Hi,
I'm really don't understand how it had get into the site,
just ignore this.
Sorry,
Daniel.
----- Begin Included Message -----
>From yair@LinuxInside.sps.mot.com Sat Aug 26 23:41:39 1995
Date: Wed, 23 Aug 1995 14:33:56 +0300 (IDT)
From: "Yair G. Rajwan" <yair@hobbes.jct.ac.il>
X-Sender: yair@LinuxInside
To: Daniel Vainer <danielv@msil>
Subject: RE: General: SVGA & X11
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Content-Length: 1562
Sorry !?
What is this ?
----------------------------------------------------------------------------
On Mon, 21 Aug 1995, Daniel Vainer wrote:
> ----------
> X-Sun-Data-Type: text
> X-Sun-Data-Description: text
> X-Sun-Data-Name: text
> X-Sun-Content-Lines: 1
>
>
> ----------
> X-Sun-Data-Type: default-app
> X-Sun-Data-Description: default
> X-Sun-Data-Name: perl.prl
> X-Sun-Content-Lines: 38
>
> #!/usr/gnu/bin/perl
> # replace the .res section in a test with the .rep file.
>
> foreach $FILE (@ARGV) {
> print "$FILE\n";
> $testfile = $FILE.".tst";
> open(READHANDLE, $testfile);
> open(WRITEHANDLE, ">TMP");
>
> $resline = "FILE.res";
> $repfile = $FILE.".rep";
> while (<READHANDLE>) {
> $line = $_;
> print WRITEHANDLE $line;
> last if ($line =~ /$resline/);
> print $line;
> }
> while (<READHANDLE>) {
> $line = $_;
> last if ($line =~ /ENDFILE/);
> }
> open(RES,"<$repfile");
> while (<RES>) { print WRITEHANDLE $_; }
> print WRITEHANDLE "ENDFILE
> ";
> while (<READHANDLE>) {
> $line = $_;
> print WRITEHANDLE $line;
> print $line;
> }
>
> close READHANDLE;
> close WRITEHANDLE;
> unlink $FILE ;
> rename("TMP", $FILE);
>
> }
>
>
>
Yair George Rajwan mailto:yair@hagiga.jct.ac.il
Ftp-Admin Tel: +972-2-751171
at Hagiga.JCT.ac.il Home: +972-2-866144
http://shekel.jct.ac.il/~rajwan
Jerusalem College of Technology. Electronics Department.
Linux Israeli GROUP Member Sci. Teaching Department.
OS/2 Israeli Team Member
----- End Included Message -----
------------------------------------------------------------------
Daniel Vainer E-MAIL:danielv@msil.sps.mot.com
SoftWare Dept. PHONE :+972-9-590 513
Motorola Semiconductor Israel Ltd. FAX :+972-9-562 990
just one of motorolians & REALLY green Linux fan
------------------------------------------------------------------