Category: | Miscellaneous |
Author/Contact Info | Majin |
Description: | Takes any file as an input and adds it to a file thats acts as a wordlist. This word list has several "uses"... I shall not tell about these uses as it might give some wannabies ideas but those who need it shall know it... |
#!/usr/bin/perl -w print "Input: "; chomp ($input = <>); print "Output: "; chomp ($output = <>); chmod 0700, "$input"; chmod 0700, "$output"; open (OUTPUT, ">> $output") || die "Error opening Output: $!\n"; open (INPUT, "< $input") || die "Error opening Input: $!\n"; while (<INPUT>) { print OUTPUT join("\n",split(/\W+/g, $_)); } |
|
---|
Replies are listed 'Best First'. | |
---|---|
(jeffa) Re: Yet Another Newbie Code...
by jeffa (Bishop) on Aug 19, 2002 at 00:57 UTC | |
by majin (Acolyte) on Aug 19, 2002 at 03:36 UTC | |
by Aristotle (Chancellor) on Aug 19, 2002 at 04:31 UTC |
Back to
Code Catacombs