Something completely different

2014-05-09 Thread Cy Kurtz
Here's a bit of code you might want to bat around a bit. This is a perl script to accept a script from the user and check all permutations of that script to see how many words, if any, can be made from the letters supplied. Slice away: #!/usr/bin/perl use List::Util qw(shuffle); use Math::BigInt

Re: perl modules

2006-12-18 Thread Cy Kurtz
I use this: #!/usr/bin/perl print "Content-Type: text/html\n\n"; use ExtUtils::Installed; my $instmod = ExtUtils::Installed->new(); foreach my $module ($instmod->modules()) { my $version = $instmod->version($module) || "???"; print "$module -- $version"; print ""; } I don

Re: find and replace large blocks

2005-06-07 Thread Cy Kurtz
again, Cy Kurtz On Tue, 2005-06-07 at 09:50 -0400, Chris Devers wrote: > On Tue, 7 Jun 2005, Cy Kurtz wrote: > > > OK ... Remember you asked for it. > > Right. Because without sufficient context, it's impossible to give an > adequate answer to a wildly open-ended question

Re: find and replace large blocks

2005-06-07 Thread Cy Kurtz
a nail with a coffee cup. On Tue, 2005-06-07 at 15:09 +0200, Xavier Noria wrote: > On Jun 7, 2005, at 14:51, Cy Kurtz wrote: > > > Is it possible to use s/foo/bar in another way to allow replacement of > > large blocks of text with spaces, quotes, and double quotes? >

find and replace large blocks

2005-06-07 Thread Cy Kurtz
Is it possible to use s/foo/bar in another way to allow replacement of large blocks of text with spaces, quotes, and double quotes? Is there a better way? Thank you, Cy Kurtz -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <h

target practice -- lottery numbers

2004-02-26 Thread Cy Kurtz
Hi all. I have a little program here that generates a lottery play slip for the mega-millions game. It selects 50 of the 52 numbers exactly once over 10 tickets of 5 numbers each. It then selects 10 super ball numbers, one for each ticket. It then prints it all out(duh). I wonder if anyone would l

using grep in perl

2004-02-03 Thread Cy Kurtz
hen I call grep from the command line, grep returns what I expect. When I call grep from perl, I get: not enough arguments for grep or search pattern not terminated Thanks, Cy Kurtz -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: here's an easy one

2003-09-21 Thread Cy Kurtz
nce I started calling it differently). I now have 170 or so of the files I wanted(apparently there are a few gaps so this thing is not quite daily) Thanks all Cy Kurtz -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

here's an easy one

2003-09-21 Thread Cy Kurtz
ose bracket. Can you tell me what I'm doing wrong here? Thanks, Cy Kurtz Here's my script: #!/usr/bin/env perl # open OUTFILE, ">output.txt" or die "Can't open output.txt: $!"; while($month < 9) { while($day

Re: [ADMIN] Re: Download Beginning Perl ebook

2003-08-14 Thread Cy Kurtz
I downloaded the zip(before I saw your warning). It looks like he just zipped up all of the pdf's from the site you recommended. At the end of Appendix is an Attribution-NoDerivs-NonCommercial License. I'm not a lawyer, but it looks like it'll be OK for Joe Average user. On Wed, 2003-08-

RE: qotd boiler

2003-05-28 Thread Cy Kurtz
busy with some non perl issues, but I took a few minutes tonight to reread your email instructions and your script. The fog is beginning to clear :) On Sun, 2003-05-25 at 23:47, Cy Kurtz wrote: > > > : By the way, what if the quote is more than one line? > > > > Er, that