After getting home from an awesome game, I was in the mood to write some more Perl! I found a few more things during the day that I wondered how I was able to go without writing them already. The first is intersection and the second is union. They do exactly what you think they do and keep things very simple, keeping with the UNIX way. "Do one thing, do it well!" Anyways, perhaps I'm just tired but I wasn't aware of a tool that provided the functionality I needed. Therefore, I did what I always do, rolled my own.
http://spl0it.org/files/intersect.pl
http://spl0it.org/files/union.pl
Let me know what you think.
Regards,
Jabra
$ cat file1The scripts can be found at:
127.0.0.1
127.0.0.2
127.0.0.3
$ cat file2
127.0.1.1
127.0.2.1
127.0.3.1
127.0.0.1
$ ./intersect file1 file2
127.0.0.1
$ ./union file1 file2
127.0.0.1
127.0.0.2
127.0.0.3
127.0.1.1
127.0.2.1
127.0.3.1
http://spl0it.org/files/intersect.pl
http://spl0it.org/files/union.pl
Let me know what you think.
Regards,
Jabra






Most Recent Entries



