Submit Hint Search The Forums LinksStatsPollsHeadlinesRSS
14,000 hints and counting!


Click here to return to the 'Perl uber geek single line version' hint
The following comments are owned by whoever posted them. This site is not responsible for what they say.
Perl uber geek single line version
Authored by: SOX on Sep 17, '04 01:36:13PM
Or for you many uber geeks, try this instead:

perl -nwaF"\t" -0x00d -e '$x = join "\t",@F[0..3]; print $x,"\n"  if  exists $h{$x}; $h{$x}=1'   file_name_of_exported_song_list

That's the one line equivalent of the perl script program. Anything printed out is a duplicate

[ Reply to This | # ]

Perl uber geek single line version
Authored by: SOX on Sep 17, '04 01:39:47PM
Arrgg... lot the backslashes when converted to html. try again:

perl -nwaF"\t" -0x00d -e '$x = join "\t",@F[0..3]; print $x,"\n" if exists $h{$x}; $h{$x}=1;; ' file_name_of_song_list

gawd I love perl: the wood chipper of text processing.

[ Reply to This | # ]

Too many Perl scripts!!!!!!!!!!
Authored by: gourls on Sep 17, '04 06:28:23PM
That was WAYYY too many Perl scripts. I don't care how geeky you are. And no, I don't know HTML. Please! No more comments for this article.

---
if you must speak, speak of topics that may never be discussed again........... ....cheers, gourls

[ Reply to This | # ]