use Perl

• buggy code? (Score:2)

  by merlyn (47)

  #!/usr/bin/perl -lw
  
  srand();
  
  open(my $fh, "grep '^....\$' /usr/share/dict/words |");
  chomp(my @w = <$fh>);
  
  print $w[rand $#w] . $w[rand $#w] for(1..20);

  That leaves out the very last word. Here's an updated version:

  #!/usr/bin/perl
  
  my @words;
  
  @ARGV = "/usr/share/dict/words";
  while (<>) {
    push @words, $1 if /^(....)$/;
  }
  
  print $words[rand @words], $words[rand @words], "\n" for 1..20;

  --
  

  • Randal L. Schwartz
  • Stonehenge
  • Re:buggy code? (Score:2)

    by gnat (29)

    With a few changes, this makes it a great way to find new military mission names:

    #!/usr/bin/perl
    
    my @words;
    
    @ARGV = "/usr/share/dict/words";
    while (<>) {
        chomp;
        push @words, $_ if length > 3;
    }
    
    print "Operation \u\L$words[rand @words]\E \u\L$words[rand @words]\E\n" for 1..20

    Sample output:

    Operation Demophobe Ammonolyze
    Operation Tripsacum Qung
    Operation Periodical Exultet
    Operation Kymatology Disagreeably
    Operation Aardvark Lycanthropist
    Operation Prelawfully Alumbloom
    Operat
    • Re:buggy code? (Score:1)

      by dws (341)

      Wasn't "Operation Cigarillo Misadvice" the lead-in to the Cuban Bay of Pigs misadventure?
      • Re:buggy code? (Score:2)

        by gnat (29)

        Nice! And "Operation Englify Ananias" was obviously the code name for the UK report on Iraq that was plagiarized and subtly distorted. "Operation Considering Microreaction" is how the US reacts to North Korea's nuclear posturing. And "Operation Scathing Anoscopy" is what'll happen to me if I don't get the Cookbook in on time. :-)

        --Nat
  • Re:buggy code? (Score:2)

    by ziggy (25)

    Yep. Fixed above. I intentionally did the grep out-of-process though.
• Won't you ever learn? (Score:1)

  by Sifmole (3409)

  The point is copyright and trademark law. It isn't an accident they come up with these names.
  • Re:Won't you ever learn? (Score:2)

    by ziggy (25)

    The issue isn't they have to come out with trademarkable names. It's that their trademarkable names are consistently bad and confusing to their target audience. How many Microsoft customers can explain what "Microsoft DNS," "Microsoft DNA" or "Microsoft .NET" are really about anyway?

    "InfoPath" is another in a long series of trademarkable bad names.
• Searchability (Score:2)

  by vsergu (505)

  At least InfoPath is somewhat more possible to search for than most other Microsoft names: Word, Excel, Access, Outlook, Exchange, Windows, .Net, Office.