Date: Sat, 04 Feb 2006 16:13:42 +0000 From: Adam Nealis <adamnealis@yahoo.co.uk> To: Kristian Vaaf <vaaf@broadpark.no> Cc: questions@freebsd.org Subject: Re: Script to generate names Message-ID: <43E4D2B6.50509@yahoo.co.uk> In-Reply-To: <7.0.1.0.2.20060203110425.01744328@broadpark.no> References: <7.0.1.0.2.20060203110425.01744328@broadpark.no>
next in thread | previous in thread | raw e-mail | index | archive | help
Kristian Vaaf wrote: > > Hello. > > I'm looking for pointers on how to make a simple shell script that will > generate new names based on words (one word per line) from two different > files, and output these to a third file. > > This would be nice to come up with new cool names, > either for business or pleasure. > > The first file will be a list of custom words. > The second file will be /usr/local/share/dict/words. > > If the first word in the custom list is "apathy" and the first word in the > dictionary file is "alien", it will generate: > > apathyalien > alienapathy > > To a third file. And then continue with the rest of the words ... > > A friend told me I could do something like this: > > for i in $(<list1) $(<list2) ; do echo -n $i ; done && echo >> list 3 That's going to ba a large file of mixed words! Would be faster in perl than in the shell. Put the below in a file, and run it like this: perl myfile.pl > myListOfMixedWords #!/usr/bin/perl use warnings; use strict; my @custw; my @dictw; my $cw; my $dw; my $i; open F1, "web2.head-100"; open F2, "web2.tail-100"; while ( chomp ( $custw[$i++] = <F1> ) ) { } $i=0; while ( chomp ( $dictw[$i++] = <F2> ) ) { } foreach $cw ( @custw ) { foreach $dw ( @dictw ) { print "$cw$dw\n"; print "$dw$cw\n"; } } > > Do you all think the same? > > Thank you so much, > Kristian > > _______________________________________________ > freebsd-questions@freebsd.org mailing list > http://lists.freebsd.org/mailman/listinfo/freebsd-questions > To unsubscribe, send any mail to > "freebsd-questions-unsubscribe@freebsd.org" > ___________________________________________________________ Yahoo! Messenger - NEW crystal clear PC to PC calling worldwide with voicemail http://uk.messenger.yahoo.com
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?43E4D2B6.50509>