in reply to Comparison Of Files
#!/usr/bin/perl -w use strict; open(INP, "/usr/bin/diff ./newsite1.txt ./newsite2.txt |") or die "pip +e: $!\n"; while (<INP>) { print substr($_,2) if (/^> /); print substr($_,2) if (/^< /); } close(INP);
decnartne ~ entranced
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
(tye)Re2: Comparison Of Files
by tye (Sage) on Dec 05, 2000 at 20:49 UTC | |
by ImpalaSS (Monk) on Dec 05, 2000 at 20:54 UTC | |
by decnartne (Beadle) on Dec 05, 2000 at 20:54 UTC |