From rbowen at rcbowen.com Sat Apr 1 19:41:40 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Words in your messages Message-ID: <38E6A554.8B9F7D5C@rcbowen.com> For some strange reason, this mailing list is configured such that certain words in the message (or in the subject line) will trigger the list to think that those messages were actual directed at the majordomo software itself, and will bounce those messages to the administrator for additional input. Some of these words are s*bscribe, uns*bscribe, and h*elp. I mention this because someone just posted a message with the word h*elp in the subject line, and it bounced it to me. Unfortunately, I don't know what to do with it now that I have received it, except to ask the sender, Ron, to resend that message, avoiding the word h*elp, or spelling it as I do here. Thanks. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sat Apr 1 19:46:35 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: hlp with h2ph :) sorry Message-ID: I have been a lurker for a long time on this list and need some help. I had to run a program for a class using anykind of scripting and I choose perl so I can start getting some skillz... However, Im having problems on finding the best way to get a syscall to work. In solaris(at least most shells) you can type 'clear' to clear the screen or 'ls' to list files. How do you make these calls in a perl script without exiting the script. I used exec clear, and the script exits. Also where and how do you add things like require 'syscall.ph'; ???? Thanks alot. Ron From rbowen at rcbowen.com Sat Apr 1 19:56:50 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: hlp with h2ph :) sorry References: Message-ID: <38E6A8E2.E3F3DF5@rcbowen.com> repett0@sac.uky.edu wrote: > > I have been a lurker for a long time on this list and need some help. I > had to run a program for a class using anykind of scripting and I choose > perl so I can start getting some skillz... However, Im having problems on > finding the best way to get a syscall to work. In solaris(at least most > shells) you can type 'clear' to clear the screen or 'ls' to list files. > How do you make these calls in a perl script without exiting the script. The first part I can answer for you. And there are two answers, sort of. OK, three. To call system calls, use the `` notation. Those are "backticks" which are on the key at the top left with the tilde (~), also known to Math majors as a twiddle. So, to call ls, do ... @results = `ls`; OR You can use the system() function, which behaves rather differently. system(ls); Might not do what you want. Finally, there's a Perl module called Shell.pm so that you can do stuff like use Shell; cp("/etc/passwd", "/tmp/passwd"); By the way, don't do that Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From sungo at earthling.net Sat Apr 1 20:10:06 2000 From: sungo at earthling.net (Matt Cashner) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: hlp with h2ph :) sorry In-Reply-To: <38E6A8E2.E3F3DF5@rcbowen.com> Message-ID: On Sat, 1 Apr 2000, Rich Bowen wrote: > repett0@sac.uky.edu wrote: > > > > I have been a lurker for a long time on this list and need some help. I > > had to run a program for a class using anykind of scripting and I choose > > perl so I can start getting some skillz... However, Im having problems on > > finding the best way to get a syscall to work. In solaris(at least most > > shells) you can type 'clear' to clear the screen or 'ls' to list files. > > How do you make these calls in a perl script without exiting the script. > > The first part I can answer for you. And there are two answers, sort of. > OK, three. > > To call system calls, use the `` notation. > You can use the system() function, which behaves rather differently. > Might not do what you want. or you can use perl to do the same sorts of thinks without calling stuff from the shell :) for ls: opendir DIR, '/home/sungo/'; my @files = readdir DIR; closedir DIR: for cp: link '/home/sungo/file1', '/home/sungo/file2'; --------------------- Matt Cashner sungo@earthling.net --------------------- "It's always darkest just before it goes pitch black." From rbowen at rcbowen.com Sat Apr 1 20:21:00 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: hlp with h2ph :) sorry References: Message-ID: <38E6AE8C.A2C40B37@rcbowen.com> Matt Cashner wrote: ... > or you can use perl to do the same sorts of thinks without calling stuff > from the shell :) A good point. It's almost never necessary, and almost always undesirable, to call a function from the shell. There is usually a way to do this from withing Perl, and that way is almost always faster and more secure. Passing stuff to the shell is a good way to have someone pass a little bit of rm -rf through our script and to the shell. It might also be interesting and entertaining to look at the Perl Power Tools, which is a project to rewrite all the standard Unix utilities (ls, rm, traceroute, and so on) in Perl. This is largely for the benefit of non-Unix folks, but is mostly for its entertainment value. ("Hey, if I can't get a date, at least I can rewrite Emacs in Perl!") Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 2 12:31:14 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: more general hlp is in order Message-ID: OK. Instead of asking something specific here is the general problem I am working on. I have a cs515 program Im working on. Basically I need to use perl to generate a bunch of permutations of an array of numbers that is passed into a C++ class that sorts it and then uses various programs to extract timing information. So basically I was asking yesterday was how to start my program from perl. But now the real problem is how do I get an array of numbers (from perl) to be input to my class. My first thought was, is there a way to just use my class in perl, or do I need to make a c++ driver to access my class.... has anyone tried this before? Ron From fprice at mis.net Sun Apr 2 12:55:24 2000 From: fprice at mis.net (Frank Price) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: hlp with h2ph :) sorry Message-ID: <20000402135524.B15377@localhost.localdomain> On Sat, Apr 01, 2000 at 09:21:00PM -0500, Rich Bowen wrote: > Matt Cashner wrote: > ... > > or you can use perl to do the same sorts of thinks without calling stuff > > from the shell :) > > A good point. It's almost never necessary, and almost always > undesirable, to call a function from the shell. There is usually a way > to do this from withing Perl, and that way is almost always faster and > more secure. Passing stuff to the shell is a good way to have someone > pass a little bit of rm -rf through our script and to the shell. It's often emphasized that when you do use system() to call the shell, do it in list context rather than string. That way the shell doesn't get involved for globbing, IFS substitution, etc. A bit more secure. Example: my @run = ('ls', '-li', '/usr/bin/'); $rc = system(@run); die "Couldn't do @run\n" if ($rc != 0); -Frank. -- Frank Price fprice@mis.net -- E Pluribus Unix | Why not go mad? -- From rbowen at rcbowen.com Sun Apr 2 15:12:44 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Banging head against wall Message-ID: <38E7A9BC.7947722C@rcbowen.com> I've been banging my head on something for a while, and I'm sure I'm looking right at the problem and not seeing it. Any assistance greatly appreciated. I've got a comma-delimited thingy, and I'm munging it into a hash like ... my %hash = map {$_ => 1} (split /,/ ,$string); But when I print keys(%hash), instead of getting a list of stuff that was in $string, I'm getting 32, which is the number if items that was in $string. I assume I'm doing something boneheaded, but I can't yet figure it out, which is why I assume it's simple, and someone will catch it right away. I really don't feel like spending the afternoon staring at debug prints. Thanks for any pointers you can offer. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From rbowen at rcbowen.com Sun Apr 2 15:15:33 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Banging head against wall References: <38E7A9BC.7947722C@rcbowen.com> Message-ID: <38E7AA65.2255D3FE@rcbowen.com> Isn't it great how posting something to dozens of your peers and humiliating yourself publically makes the answer spring into glaring obviousness immediately after you press send? *sheesh* Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 2 19:10:07 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: join Message-ID: how do you do a join on a number and an array say you have the following $m = 50; then an array @foo that is an array of 10000 ints... I want to join them and pass them in too a program(c++) I pring out the join and its showing wierd things $temp = join(" ", $m, @foo); It should look like 50 10 12 8 .... but it is just flashing faint numbers occasinally by so fast and if I hit control c it has nothing on the screen.. ?? Thanks Ron From tom at ichthus.org Sun Apr 2 20:25:31 2000 From: tom at ichthus.org (Tom Braun) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join In-Reply-To: Message-ID: <000201bf9d0b$84ab8ea0$080614ac@student.asbury.edu> I'm no expert, but it looks to me that you have the join syntax right. I tried the following just to make sure $scalar = 50; for ($i = 1; $i <= 25; $i++) { push @array, $i } $temp = join(" ", $scalar, @array); print $temp . "\n"; and it printed 50 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 Are you sure you have nothing else in the array than just the numbers...no endlines or other misc whitespace characters? You may want to try just printing out what join is doing manually to see if you get what you're expecting. The following should work: print $scalar; foreach $element (@array) {print " $element"} If that give you the same funny output, then the problem is probably in your array somewhere. You can also try running the script from a prompt, rather than from the C++ program, to make sure that works. Hope that helps. Tom -----Original Message----- From: owner-lexington-pm-list@pm.org [mailto:owner-lexington-pm-list@pm.org]On Behalf Of repett0@sac.uky.edu Sent: Sunday, April 02, 2000 8:10 PM To: LUG; lexington-pm-list@happyfunball.pm.org; UK Labrats Subject: LPM: join how do you do a join on a number and an array say you have the following $m = 50; then an array @foo that is an array of 10000 ints... I want to join them and pass them in too a program(c++) I pring out the join and its showing wierd things $temp = join(" ", $m, @foo); It should look like 50 10 12 8 .... but it is just flashing faint numbers occasinally by so fast and if I hit control c it has nothing on the screen.. ?? Thanks Ron From repett0 at sac.uky.edu Sun Apr 2 20:37:24 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join In-Reply-To: <000201bf9d0b$84ab8ea0$080614ac@student.asbury.edu> Message-ID: I think Im seeing the problem. Perl dosen't do arrays of numbers?? At least that is my assumption. I am trying to do this #!/usr/local/bin/perl srand( time() ^ ($$ + ($$ << 15)) ); for($i=0; $i<10; $i++) $foo[$i] = int(rand(10)); cassius 75: test.pl Scalar found where operator expected at test.pl line 6, at end of line (Missing operator before ?) syntax error at test.pl line 6, near ") $foo" Execution of test.pl aborted due to compilation errors. cassius 76: Do you see what Im doing. I want to make an array of random number, then take this and pass it in with other information to a c++ program. I know I could have done this all in c++ but I have instructions to do it this way... Thanks Ron From rbowen at rcbowen.com Sun Apr 2 20:44:53 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join References: Message-ID: <38E7F795.8622CBD6@rcbowen.com> repett0@sac.uky.edu wrote: > > I think Im seeing the problem. Perl dosen't do arrays of numbers?? At Perl does arrays of numbers just fine. Perl is not real picky about the whole number vs string thing. It's all the same to Perl (in most cases). > least that is my assumption. I am trying to do this > > #!/usr/local/bin/perl > > srand( time() ^ ($$ + ($$ << 15)) ); Perl calls srand for you the first time you call rand. This line is not really necessary. > for($i=0; $i<10; $i++) Missing a { here. The body of a for loop is enclosed in { } > $foo[$i] = int(rand(10)); > > cassius 75: test.pl > Scalar found where operator expected at test.pl line 6, at end of line > (Missing operator before ?) > syntax error at test.pl line 6, near ") > $foo" > Execution of test.pl aborted due to compilation errors. > cassius 76: > > Do you see what Im doing. I want to make an array of random number, then > take this and pass it in with other information to a c++ program. I know > I could have done this all in c++ but I have instructions to do it this > way... Hope this helps. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From rbowen at rcbowen.com Sun Apr 2 20:47:29 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join References: Message-ID: <38E7F831.5E437595@rcbowen.com> repett0@sac.uky.edu wrote: > ... > for($i=0; $i<10; $i++) > $foo[$i] = int(rand(10)); By the way, I couldn't resist. A more "Perlish" way to do this would be: $foo[$_] = int(rand(10)) for (1..10); :-) Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 2 20:55:16 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join In-Reply-To: <38E7F831.5E437595@rcbowen.com> Message-ID: thanks, now I see the problem (I think :)) you need to use brackets. I assumed that you get one line for free like c/c++ or java. One more ?, how do you get the length. Im doing it like this now... #!/usr/local/bin/perl for($i = 0; $i < 10; $i++) { $foo[$i] = int(rand(10));print "$foo[$i]\n";} Thanks,... Ron On Sun, 2 Apr 2000, Rich Bowen wrote: > repett0@sac.uky.edu wrote: > > > ... > > for($i=0; $i<10; $i++) > > $foo[$i] = int(rand(10)); > > By the way, I couldn't resist. A more "Perlish" way to do this would be: > > $foo[$_] = int(rand(10)) for (1..10); > > :-) > > Rich > -- > http://www.ApacheUnleashed.com/ > Lexington Perl Mongers - http://lexington.pm.org/ > PGP Key - http://www.rcbowen.com/pgp.txt > From rbowen at rcbowen.com Sun Apr 2 21:07:08 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join References: Message-ID: <38E7FCCC.7D36A615@rcbowen.com> repett0@sac.uky.edu wrote: > > thanks, now I see the problem (I think :)) you need to use brackets. I > assumed that you get one line for free like c/c++ or java. One more ?, > how do you get the length. Im doing it like this now... > > #!/usr/local/bin/perl > > for($i = 0; $i < 10; $i++) > { $foo[$i] = int(rand(10));print "$foo[$i]\n";} That works. -OR- $foo[$_] = int(rand(10)) and print "$foo[$_]\n" for (1..10); But then, I'm usually an advocate of readability, and so I'd probably write it as for (1..10) { $foo[$_] = int(rand(10)); print "$foo[$_]\n"; } Or, better yet, foreach $i (1..10) { $foo[$i] = int(rand(10)); print "$foo[$i]\n"; } After all, TIMTOWTDI _is_ the motto of Perl. I never use the "for (;;)" syntax if I can avoid it. Somehow, it seems rather cumbersome to me. But it might be more comfortable to a C programmer. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 2 21:10:52 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join In-Reply-To: <38E7FCCC.7D36A615@rcbowen.com> Message-ID: ok so how do you get the length of the array?? thats the main question now... Ron On Sun, 2 Apr 2000, Rich Bowen wrote: > repett0@sac.uky.edu wrote: > > > > thanks, now I see the problem (I think :)) you need to use brackets. I > > assumed that you get one line for free like c/c++ or java. One more ?, > > how do you get the length. Im doing it like this now... > > > > #!/usr/local/bin/perl > > > > for($i = 0; $i < 10; $i++) > > { $foo[$i] = int(rand(10));print "$foo[$i]\n";} > > That works. > > -OR- > > $foo[$_] = int(rand(10)) and print "$foo[$_]\n" for (1..10); > > But then, I'm usually an advocate of readability, and so I'd probably > write it as > > for (1..10) { > $foo[$_] = int(rand(10)); > print "$foo[$_]\n"; > } > > Or, better yet, > > foreach $i (1..10) { > $foo[$i] = int(rand(10)); > print "$foo[$i]\n"; > } > > After all, TIMTOWTDI _is_ the motto of Perl. > > I never use the "for (;;)" syntax if I can avoid it. Somehow, it seems > rather cumbersome to me. But it might be more comfortable to a C > programmer. > > Rich > -- > http://www.ApacheUnleashed.com/ > Lexington Perl Mongers - http://lexington.pm.org/ > PGP Key - http://www.rcbowen.com/pgp.txt > From rbowen at rcbowen.com Sun Apr 2 21:15:34 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: RE: join References: Message-ID: <38E7FEC6.672788DC@rcbowen.com> repett0@sac.uky.edu wrote: > > ok so how do you get the length of the array?? thats the main question > now... If array is @foo, $length = @foo; That's the actual number of elements in @foo. (The jargon is "evaluate the array in scalar context.") By the way, remember that array indices start with 0, so you may be getting yourself in trouble by starting your numbering at 1. You really should use (0..9) in your loop. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 2 23:24:54 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: redirecting output Message-ID: Since Im running my script, that executes a c++ program, do I always have to catch the output and print the variable. Is there a way to avoid $temp = `a.out`; The problem is, this program takes hours to run and I don't want to wait to see the output. Thanks. Ill show the fuits of my labor hopefully tommorrow, my first script. Ron From fireston at lexmark.com Mon Apr 3 07:56:16 2000 From: fireston at lexmark.com (Mik Firestone) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: redirecting output In-Reply-To: Message-ID: <200004031256.IAA18468@interlock2.lexmark.com> Yes, there is. My preferred way is to used a piped open: open FH, "a.out |" or die "Couldn't open the pipe"; You can then read from this like a standard file handle. The danger, especially with an expected run time of hours, is a blocking read. Make sure you use select correctly and don't spin the loop too tight. There is also a warning in the manpages to only use sysread when using select loops. Oh - there are ( of course ) other ways. Do a perldoc perlipc and look for the stuff on pipes. Mik On Mon, 3 Apr 2000 repett0%sac.uky.edu@interlock.lexmark.com wrote: > > Since Im running my script, that executes a c++ program, do I always have > to catch the output and print the variable. Is there a way to avoid > > $temp = `a.out`; > > The problem is, this program takes hours to run and I don't want to wait > to see the output. > > Thanks. > > Ill show the fuits of my labor hopefully tommorrow, my first script. > > Ron > > > -- Mik Firestone fireston@lexmark.com When I become an Evil Overlord: My pet monster will be kept in a secure cage from which it cannot escape and into which I could not accidentally stumble. From repett0 at sac.uky.edu Mon Apr 3 13:09:33 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: system Message-ID: say I have an array @foo of ints and some scalars like $m=50 $run = "a.out" if I do this on a.out will it bypass the shell and give the array and $m as command line ar system($run,$m,@foo); Thanks Ron From sml at zfx.com Mon Apr 3 13:13:37 2000 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: system References: Message-ID: <38E8DF51.1CFB@zfx.com> repett0@sac.uky.edu wrote: > > say I have an array @foo of ints > > and some scalars like $m=50 > > $run = "a.out" > > if I do this on a.out will it bypass the shell and give the array and $m > as command line ar > > system($run,$m,@foo); yes. provided a.out is in your path. -- Steve Lane From gcasillo at ket.org Tue Apr 4 12:49:39 2000 From: gcasillo at ket.org (Gregg Casillo) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl 5.6 released References: <200003272342.SAA08690@sidewinder.fetterprinting.com> <38E0FB1D.9F0C6A59@rcbowen.com> Message-ID: <38EA2B33.DBA33B24@ket.org> This may sound like a lame question, but does perlcc require a separate C/C++ compiler (e.g. gcc, egcs). Or is the compiler part of the 5.6 distribution? I ask because most of my Perl work these days is for the Win32 platform where Visual C++ (bleck!) rules the earth. Of course there's DJGPP, but I digress. I really must go and read about 5.6... Gregg Casillo gcasillo@ket.org Rich Bowen wrote: > Janine Ladick wrote: > > > > Yay! > > > > Is this the release that will have a compiler? > > Um, sort of ... > > [rbowen@localhost /tmp]$ cat test.pl > #!/usr/bin/perl > print "Hello World\n"; > > [rbowen@localhost /tmp]$ perl test.pl > Hello World > > (so far, so good) > > [rbowen@localhost /tmp]$ perlcc test.pl > > -------------------------------------------------------------------------------- > Compiling test.pl: > -------------------------------------------------------------------------------- > Making C(test.pl.c) for test.pl! > perl -I/usr/local/lib/perl5/5.6.0/i586-linux > -I/usr/local/lib/perl5/5.6.0 -I/usr > /local/lib/perl5/site_perl/5.6.0/i586-linux > -I/usr/local/lib/perl5/site_perl/5.6 > .0 -I/usr/local/lib/perl5/site_perl -I. -MB::Stash -c test.pl > perl -I/usr/local/lib/perl5/5.6.0/i586-linux > -I/usr/local/lib/perl5/5.6.0 -I/usr > /local/lib/perl5/site_perl/5.6.0/i586-linux > -I/usr/local/lib/perl5/site_perl/5.6 > .0 -I/usr/local/lib/perl5/site_perl -I. -MO=C,-umain,-uattributes,-uDB > test.pl > Starting compile > Walking tree > Prescan > Saving methods > Bootstrap attributes test.pl > Writing output > Loaded B > Loaded IO > Loaded Fcntl > test.pl syntax OK > Compiling C(test) for test.pl! > perl -I/usr/local/lib/perl5/5.6.0/i586-linux > -I/usr/local/lib/perl5/5.6.0 -I/usr > /local/lib/perl5/site_perl/5.6.0/i586-linux > -I/usr/local/lib/perl5/site_perl/5.6 > .0 -I/usr/local/lib/perl5/site_perl -I. /tmp/test.pl.tst > cc -fno-strict-aliasing -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 > -I/usr/local > /lib/perl5/5.6.0/i586-linux/CORE -o test test.pl.c -L/usr/local/lib > -L/usr/loc > al/lib/perl5/5.6.0/i586-linux/CORE -lperl -lnsl -lndbm -lgdbm -ldb -ldl > -lm -lc > -lposix -lcrypt /usr/local/lib/perl5/5.6.0/i586-linux/auto/IO/IO.so > /usr/local/l > ib/perl5/5.6.0/i586-linux/auto/Fcntl/Fcntl.so > /tmp/ccRdBXSU.o: In function `xs_init': > /tmp/ccRdBXSU.o(.text+0x3279): undefined reference to `boot_DynaLoader' > ERROR: In compiling code for test.pl.c ! > > Um ... huh? > test.pl is 40bytes. The generated test.pl.c is about 35k. But I'm a > little lost as to what's going on in the compile stage there, and why it > failed. Apparently I'm not the only one. Tom Christiansen posted a > similar example to P5P a few days ago, wondering why it did not work. > Perhaps we'll see some progress on this in the next few days. > > Rich > -- > http://www.ApacheUnleashed.com/ > Lexington Perl Mongers - http://lexington.pm.org/ > PGP Key - http://www.rcbowen.com/pgp.txt From hempy at ket.org Tue Apr 4 13:46:29 2000 From: hempy at ket.org (David Hempy) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Banging head against wall In-Reply-To: <38E7AA65.2255D3FE@rcbowen.com> References: <38E7A9BC.7947722C@rcbowen.com> Message-ID: <4.3.2.20000404144539.00cfda60@mail.ket.org> At 04:15 PM 4/2/00 -0400, you wrote: >Isn't it great how posting something to dozens of your peers and >humiliating yourself publically makes the answer spring into glaring >obviousness immediately after you press send? > >*sheesh* Gauranteed...every time. So, what was the solution? (Not that I understand what you're doing in the first place... ;-) -dave -- David Hempy Internet Database Administrator Kentucky Educational Television -- (606)258-7164 -- (800)333-9764 From rbowen at rcbowen.com Tue Apr 4 15:04:06 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Banging head against wall References: <38E7A9BC.7947722C@rcbowen.com> <4.3.2.20000404144539.00cfda60@mail.ket.org> Message-ID: <38EA4AB6.8EE8065D@rcbowen.com> David Hempy wrote: > > At 04:15 PM 4/2/00 -0400, you wrote: > >Isn't it great how posting something to dozens of your peers and > >humiliating yourself publically makes the answer spring into glaring > >obviousness immediately after you press send? > > > >*sheesh* > > Gauranteed...every time. > > So, what was the solution? > > (Not that I understand what you're doing in the first place... ;-) It's almost too embarassing to talk about. After I forget how long wrestling with this, it turned out that I was using one variable as my loop variable ($_ to be precise) and referring to a different variable ($ID) inside the loop. There. Happy now? ;-) Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Wed Apr 5 21:35:53 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ Message-ID: Would anyone happen to know of the best way to get input to a c++ program. 1) I create an array of integers in perl 2) I pass that array as a command line arg to a c++ prog Problems 1) the array is up to 100,000 ints 2) my c++ prog takes about 4 hours to run. I always run our of space on my account before I can tell it worked. Im saying this doesn't work, but Im sure yes or no. So if someone know the proper way please share... Thanks Ron Petty From fireston at lexmark.com Thu Apr 6 07:27:55 2000 From: fireston at lexmark.com (Mik Firestone) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ In-Reply-To: Message-ID: <200004061227.IAA15970@interlock2.lexmark.com> Ths stupid simple way of doing this is to cause your perl program to write the values out to a file ( one element per line ) and have your c++ program read the file. You could even get fancy and send the file name as the single command line parameter to your c++ program. Mik On Wed, 5 Apr 2000 repett0%sac.uky.edu@interlock.lexmark.com wrote: > > Would anyone happen to know of the best way to get input to a c++ program. > > 1) I create an array of integers in perl > 2) I pass that array as a command line arg to a c++ prog > > Problems > 1) the array is up to 100,000 ints > 2) my c++ prog takes about 4 hours to run. I always run our of space on > my account before I can tell it worked. > > Im saying this doesn't work, but Im sure yes or no. So if someone know > the proper way please share... > > Thanks > Ron Petty > > > -- Mik Firestone fireston@lexmark.com When I become an Evil Overlord: When the rebel leader challenges me to fight one-on-one and asks, "Or are you afraid without your armies to back you up?" My reply will be, "No, just sensible." From oneiros at dcr.net Thu Apr 6 07:28:26 2000 From: oneiros at dcr.net (Joe Hourcle) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ In-Reply-To: Message-ID: On Wed, 5 Apr 2000 repett0@sac.uky.edu wrote: > > Would anyone happen to know of the best way to get input to a c++ program. > > 1) I create an array of integers in perl > 2) I pass that array as a command line arg to a c++ prog > > Problems > 1) the array is up to 100,000 ints > 2) my c++ prog takes about 4 hours to run. I always run our of space on > my account before I can tell it worked. > > Im saying this doesn't work, but Im sure yes or no. So if someone know > the proper way please share... When I'm dealing with lists that long, I tend to write it out to a file, and have the second program read the file. You might want to write it out to temp space (/tmp, if on a unix box) if you're having quota problems. -Joe From rbowen at rcbowen.com Thu Apr 6 07:35:25 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ References: Message-ID: <38EC848D.D4EC65A9@rcbowen.com> Joe Hourcle wrote: ... > You might want to write it out to temp space (/tmp, if on a unix box) if > you're having quota problems. Some *nixes handle quote based on file ownership, not file location. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From soward at uky.edu Fri Apr 7 09:51:06 2000 From: soward at uky.edu (John Soward) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ References: <38EC848D.D4EC65A9@rcbowen.com> Message-ID: <38EDF5DA.DEB3A8AE@uky.edu> Rich Bowen wrote: > > Joe Hourcle wrote: > ... > > You might want to write it out to temp space (/tmp, if on a unix box) if > > you're having quota problems. > > Some *nixes handle quote based on file ownership, not file location. > I'm not aware of any...most are ownership based, but limited to the particular FS on which quota's are enabled and configured....I'm sure there are other optional packages for various OSes from third parties, just as there are for ACLs and other items. The Perl Quota package wouldn't work for them ;) -- John Soward Lead Systems Programmer, Technical Services, University of Kentucky p: 606.257.2900x298 e:soward@uky.edu w: http://neworder.cc.uky.edu/ From dpitts at mk.net Fri Apr 7 09:53:34 2000 From: dpitts at mk.net (David Pitts) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ References: <38EC848D.D4EC65A9@rcbowen.com> <38EDF5DA.DEB3A8AE@uky.edu> Message-ID: <004501bfa0a1$0cae6dc0$7801a8c0@adverb.com> If I remember correctly (and I have been wrong more times than not the past week), Linux handles quotas based on file ownership and not location. Can anyone validate this? Thanks, David David Pitts President, Pitts Technical Resources, Inc. (859) 552-3262 www.dpitts.com dpitts@mk.net ----- Original Message ----- From: "John Soward" To: Sent: Friday, April 07, 2000 10:51 AM Subject: Re: LPM: perl & c++ > Rich Bowen wrote: > > > > Joe Hourcle wrote: > > ... > > > You might want to write it out to temp space (/tmp, if on a unix box) if > > > you're having quota problems. > > > > Some *nixes handle quote based on file ownership, not file location. > > > I'm not aware of any...most are ownership based, but limited to the > particular FS on which quota's are enabled and configured....I'm sure > there are other optional packages for various OSes from third parties, > just as there are for ACLs and other items. The Perl Quota package > wouldn't work for them ;) > > -- > John Soward > Lead Systems Programmer, Technical Services, University of Kentucky > p: 606.257.2900x298 e:soward@uky.edu w: http://neworder.cc.uky.edu/ > From soward at uky.edu Fri Apr 7 10:20:42 2000 From: soward at uky.edu (John Soward) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: perl & c++ References: <38EC848D.D4EC65A9@rcbowen.com> <38EDF5DA.DEB3A8AE@uky.edu> <004501bfa0a1$0cae6dc0$7801a8c0@adverb.com> Message-ID: <38EDFCCA.40C87727@uky.edu> David Pitts wrote: > > If I remember correctly (and I have been wrong more times than not the past > week), Linux handles quotas based on file ownership and not location. Can > anyone validate this? > Linux quota's are just like HPUX, FreeBSD, SCO, SGI, AIX, SOLARIS, and others I've worked with. At least relatively recent flavors of Linxu on i386, Alpha, and UltraSparc platforms. Quota's must be enabled on each filesystem that you wish to limit or tabulate a users file useage on. Obviously this implies that they are based on file ownership, but only ownership on a particular filesystem. Thus if you have quota's enabled on /users and /tmp is a seperate FS users can write whatever size files they want in /tmp. Of course, you can simply set a users quota on both filesystems. From a system administration standpoint this can be problematic at times, for example on SAC.uky.edu there are lots of student accounts spread across several file systems, if you established quotas only on one file system, or the same quota on all filesystesm, then two friendly users who's accounts reside on different file systems could use excess space by letting each other write into an area of the others account, so you have to give each user the correct quota for their home filesystem and a quota of 1 (0 == no quota) on all other user file systems. A combined quota system would create problems of it's own, what would happen, for example, when an existing filesystem became unavailable, or a new one were added. Also it appears that WinNT does not have any quota system, although there are some 3rd party ones. But I have been told that Win2K does, I haven't tried out win2k since a long ago beta, so if anyone could verify this I would find it usefull, and since this is a perl list, if anyone knows if/how you can access/modify win2k quotas from perl, that too would be useful... thanx, -- John Soward Lead Systems Programmer, Technical Services, University of Kentucky p: 606.257.2900x298 e:soward@uky.edu w: http://neworder.cc.uky.edu/ From sungo at earthling.net Sun Apr 9 10:21:38 2000 From: sungo at earthling.net (Matt Cashner) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: meeting on mon. Message-ID: do we have a topic / speaker for tommorrow? just curious... :) --------------------- Matt Cashner sungo@earthling.net --------------------- "Hard work often pays off after time, but laziness always pays off now." From rbowen at rcbowen.com Sun Apr 9 10:51:52 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: meeting on mon. References: Message-ID: <38F0A718.A875A5F@rcbowen.com> Matt Cashner wrote: > > do we have a topic / speaker for tommorrow? just curious... :) Good grief, is that tomorrow already? The tentative topic was supposedly mod_perl, although it appears that for the most part, it will be a pooling of our collective ignorance. I'm going to bring Stas Bekman's notes from his talk at The Perl Conference and at ApacheCon, and we can gather around them, like some holy relic, and marvel. We will then share a communion of Pizza and Cola beverages, sing the doxology ("Unto Larry, and the Camel, and the P5P, be all glory, now and forever, amen."), and go out to tell the world. Or something like that. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From sungo at earthling.net Sun Apr 9 10:57:15 2000 From: sungo at earthling.net (Matt Cashner) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: meeting on mon. In-Reply-To: <38F0A718.A875A5F@rcbowen.com> Message-ID: On Sun, 9 Apr 2000, Rich Bowen wrote: > The tentative topic was supposedly mod_perl, although it appears that > for the most part, it will be a pooling of our collective ignorance. some mod_perl talk could be quite good. seeing as i'm ready to kick it in its fool head. :P but whatever :) --------------------- Matt Cashner sungo@earthling.net --------------------- "Never underestimate the power of stupid people in large groups." From rbowen at rcbowen.com Sun Apr 9 14:34:24 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: FreezeThaw Message-ID: <38F0DB40.73534AA7@rcbowen.com> Have any of you folks used Freeze/Thaw for any serious data application? That is, something like using freeze() to bundle a hash, and put that in a database for later thawing? Perhaps this is not at all what it was intended to do, but it just occurred to me, that that might be a reasonable solution to a problem I've been chewing at for a while. If I've just been smoking the wacky weed to come up with an idea like that, just let me know. More generally, I'd like to hear of any other application in which you might have used FreezeThaw. Thanks. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 9 17:17:44 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: ACM talk Message-ID: Hi, this thursday is the last meeting for the UK ACM. We are having a talk on the results of the IEEE robotics competition this weekend. where CB(Whitehall classroom building on campus) room 204 when 330-530, this coming thursday Not only will we be hearing about the competition, but how to code for it.. so we would like diverse crowd to come and maybe discuss alternate solutions then what was used (Perl, Jave, etc...) So come on and see whats going on.... Ron Petty ACM President UKLUG Secretary PERLMONGER newbie :) From ken.rietz at asbury.edu Mon Apr 10 14:40:11 2000 From: ken.rietz at asbury.edu (ken.rietz@asbury.edu) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Reading from Excel with Perl Message-ID: Hi -- I was wondering if any of you have had experience trying to read data from an Excel spreadsheet using Perl on a Win machine. My initial thought is to use the ODBC interface. Is there any better way? Is it going to be more frustration than it's worth? I can currently export the data as tab-delimited ASCII, and pull it apart with split, and it works fine. I was hoping to eliminate the export step, though. TIA -- Ken Rietz From rbowen at rcbowen.com Mon Apr 10 15:33:22 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:44 2004 Subject: LPM: Reading from Excel with Perl References: Message-ID: <38F23A92.BF1FA830@rcbowen.com> ken.rietz@asbury.edu wrote: > > Hi -- > > I was wondering if any of you have had experience trying to read > data from an Excel spreadsheet using Perl on a Win machine. > My initial thought is to use the ODBC interface. Is there any > better way? Is it going to be more frustration than it's worth? > I can currently export the data as tab-delimited ASCII, and pull > it apart with split, and it works fine. I was hoping to eliminate > the export step, though. The two ways that I've done this are DBI::ODBC and OLE. OLE was rather a pain, and had the rather large overhead of actually launching the Excel executable. DBI is somewhat dain bramaged in that you have to know row and column locations to do selects, but seemed to work pretty well if you can get past that. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From llang at baywestpaper.com Mon Apr 10 15:34:50 2000 From: llang at baywestpaper.com (llang@baywestpaper.com) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: Reading from Excel with Perl Message-ID: Seems like Win32::OLE would be the better way to go. I've never actually used it, but my understanding is that you could access the cells directly and read the data from them directly into your variables. Loren Lang Phone: 606-734-0538 x326 Network Administrator Fax: 606-734-8210 Bay West Paper Corporation email: llang@baywestpaper.com "Computers save time like kudzu prevents soil erosion." - Al Castanoli ken.rietz@asbury.edu Sent by: To: lexington-pm-list@pm.org owner-lexington-pm-l cc: ist@pm.org Subject: LPM: Reading from Excel with Perl 04/10/00 03:40 PM Please respond to lexington-pm-list Hi -- I was wondering if any of you have had experience trying to read data from an Excel spreadsheet using Perl on a Win machine. My initial thought is to use the ODBC interface. Is there any better way? Is it going to be more frustration than it's worth? I can currently export the data as tab-delimited ASCII, and pull it apart with split, and it works fine. I was hoping to eliminate the export step, though. TIA -- Ken Rietz From sml at zfx.com Mon Apr 10 12:08:18 2000 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: FreezeThaw References: <38F0DB40.73534AA7@rcbowen.com> Message-ID: <38F20A82.6201@zfx.com> i (and my co-workers) have used FreezeThaw many, many times. i'm fairly sure it's part of one of our core applications, in fact. it's been at least over a year since i wrote anything with it, so i don't have any quick comments about its use other than i remember it being extremely easy to figure out and use. it should definitely be suitable for serializing a hash. you might also want to look at Storable.pm. i think that's what tchrist prefers. that may be only because Ilya wrote FreezeThaw, though... good luck with it; it does sound like what you're looking for. Rich Bowen wrote: > > Have any of you folks used Freeze/Thaw for any serious data application? > That is, something like using freeze() to bundle a hash, and put that in > a database for later thawing? Perhaps this is not at all what it was > intended to do, but it just occurred to me, that that might be a > reasonable solution to a problem I've been chewing at for a while. If > I've just been smoking the wacky weed to come up with an idea like that, > just let me know. > > More generally, I'd like to hear of any other application in which you > might have used FreezeThaw. -- Steve Lane From repett0 at sac.uky.edu Mon Apr 10 17:12:17 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: content editor Message-ID: I have asked this before, and got some varied aswers.. Ill ask again before I break my neck coding. I need to make a non-html content editor. Basically, I need a way for someone to look at a website and there be a little link somewhere that lets a user log into that page and edit content and then save it. There not changing the layout, just the content like hotel listings, phone #'s etc.... Thanks Ron From oneiros at dcr.net Tue Apr 11 07:26:22 2000 From: oneiros at dcr.net (Joe Hourcle) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: content editor In-Reply-To: Message-ID: On Mon, 10 Apr 2000 repett0@sac.uky.edu wrote: > I have asked this before, and got some varied aswers.. Ill ask again > before I break my neck coding. > > I need to make a non-html content editor. Basically, I need a way for > someone to look at a website and there be a little link somewhere that > lets a user log into that page and edit content and then save it. There > not changing the layout, just the content like hotel listings, phone #'s > etc.... Well, from the sounds of it, it's something that's being built from a list. What I've done in the past, when I didn't think it was important enough to justify a true database, I'd give them ways of minipulating information in a flat file, and after they were done, call a program that'd parse that flat file, and output pretty HTML. Inserting files is easy, it starts to get trickier when you're dealing with editing existing records and deleting them is when you want to make sure that you're calling a flock() or something similar, and have something unique to key off of. ----- Joe Hourcle From rbowen at rcbowen.com Tue Apr 11 08:08:24 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: content editor References: Message-ID: <38F323C8.F4277AD7@rcbowen.com> Joe Hourcle wrote: > > On Mon, 10 Apr 2000 repett0@sac.uky.edu wrote: > > > I have asked this before, and got some varied aswers.. Ill ask again > > before I break my neck coding. > > > > I need to make a non-html content editor. Basically, I need a way for > > someone to look at a website and there be a little link somewhere that > > lets a user log into that page and edit content and then save it. There > > not changing the layout, just the content like hotel listings, phone #'s > > etc.... > > Well, from the sounds of it, it's something that's being built from a > list. > > What I've done in the past, when I didn't think it was important enough to > justify a true database, I'd give them ways of minipulating information in > a flat file, and after they were done, call a program that'd parse that > flat file, and output pretty HTML. > > Inserting files is easy, it starts to get trickier when you're dealing > with editing existing records and deleting them is when you want to make > sure that you're calling a flock() or something similar, and have > something unique to key off of. I wrote a little document a while back about text-file "databases". I never finished it, but it has some good stuff in it. http://www.rcbowen.com/imho/cgi-database/textfiles/index.html See also DBD::CSV for a good text file "database" manager. Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From hempy at ket.org Tue Apr 11 12:36:18 2000 From: hempy at ket.org (David Hempy) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: content editor In-Reply-To: <38F323C8.F4277AD7@rcbowen.com> References: Message-ID: <4.3.1.2.20000411133430.050ede90@mail.ket.org> At 09:08 AM 4/11/00 -0400, you wrote: >I wrote a little document a while back about text-file "databases". I >never finished it, but it has some good stuff in it. >http://www.rcbowen.com/imho/cgi-database/textfiles/index.html > >See also DBD::CSV for a good text file "database" manager. > >Rich Rich - just spent some time on your cgi-database pages. This is great stuff! Very reassuring to see the original spirit of the web persisting on such an individual level. Keep up the good work! -dave -- David Hempy Internet Database Administrator Kentucky Educational Television -- (606)258-7164 -- (800)333-9764 From dpitts at mk.net Tue Apr 11 14:53:13 2000 From: dpitts at mk.net (David Pitts) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: Red Hat Message-ID: <001e01bfa3ef$927add20$7801a8c0@adverb.com> I don't know if any of you follow the stock market. I also don't know if any of you follow Red Hat. If you do, you know that Red Hat has taken a dive this year, opening at around 102 and sitting today at around 31. Well, I did some investigating and here is what I found: Transaction Date Name Action Shares Price Value Type D/I* Remaining Shares 03/23/00 IBM Corporation Shareholder Planned Sale 250,000 - 14,375,000 - - - 03/07/00 Oracle Corp. Shareholder Planned Sale 164,717 - 10,000,000 - - - 02/25/00 Itel Corp Shareholder Planned Sale 50,000 - 3,412,500 - - - For those of you that don't understand it, this means that Red Hat's three biggest corporate sponsors now own no part of Red Hat. All three have sold their shares. Granted, they were planned sales. In addition, if you look at the buying and selling trend of the top people of the company, you find: 02/09/00 Young, Robert F. Director Sale 160,751 90.73 14,584,938 com D 7,721,089 02/09/00 Young, Robert F. Director Non-Open Market Sale 160,751 90.73 14,584,938 com I 10,121,061 02/09/00 Young, Robert F. Director Sale 160,751 90.73 14,584,938 com D 7,721,089 02/09/00 Young, Robert F. Director Non-Open Market Sale 160,751 90.73 14,584,938 com I 10,121,061 02/09/00 Ewing, Marc Director Sale 331,745 90.73 30,099,223 com D 15,435,767 02/09/00 Ewing, Marc Director Sale 331,745 90.73 30,099,223 com D 15,435,767 02/09/00 George, Manoj Chief Financial Officer Sale 7,998 90.73 725,658 com D 430,206 02/09/00 George, Manoj Chief Financial Officer Sale 7,998 90.73 725,658 com D 430,206 02/09/00 Batten, Frank(grat98) Beneficial Owner (10% Or More) Sale 25,000 90.73 2,268,250 com D 26,948,284 02/09/00 Batten, Frank(grat98) Beneficial Owner (10% Or More) Sale 25,000 90.73 2,268,250 com D 26,948,284 02/09/00 Shumannfang, David Secretary Sale 2,190 90.73 198,698 com D 117,810 02/09/00 Shumannfang, David Secretary Sale 2,190 90.73 198,698 com D 117,810 02/09/00 Batten, Frank Jr. Beneficial Owner (10% Or More) Sale 25,000 90.73 2,268,250 com I 26,948,284 02/09/00 Batten, Frank Jr. Beneficial Owner (10% Or More) Sale 25,000 90.73 2,268,250 com I 26,948,284 02/09/00 Young, Nancy R. Beneficial Owner (10% Or More) Sale 160,751 95.00 15,271,345 com D 6,884,741 02/09/00 Young, Nancy R. Beneficial Owner (10% Or More) Non-Open Market Sale 160,751 95.00 15,271,345 com I 10,957,409 02/09/00 Young, Nancy R. Beneficial Owner (10% Or More) Sale 160,751 95.00 15,271,345 com D 6,884,741 02/09/00 Young, Nancy R. Beneficial Owner (10% Or More) Non-Open Market Sale 160,751 95.00 15,271,345 com I 10,957,409 02/09/00 Szulik, Matthew J. President Sale 38,826 90.73 3,522,682 com D 2,016,530 02/09/00 Szulik, Matthew J. President Sale 38,826 90.73 3,522,682 com D 2,016,530 Now, at first glance, this may seem bad with everyone and their mother selling off shares, but let me spin a slightly different tale. They all had to hold on to the stocks for six months. They could not sale before 2/9/00. They are all (and the list is much longer, I shortened it for brevity) trying to cash in on their investment before the bottom completely dropped out. My advice, look for other companies that have IPO'd recently to do the same, pull out before the 6 month date (although I would say the 5 month date), and watch the stocks fall through the floor. When they hit rock bottom (which for rhat will be around 16 dollars a share - my prediction), then it will be time to invest again. Thanks, David David Pitts President, Pitts Technical Resources, Inc. (859) 552-3262 www.dpitts.com dpitts@mk.net -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/lexington-pm/attachments/20000411/4852a6d2/attachment.htm From sungo at earthling.net Thu Apr 13 14:27:49 2000 From: sungo at earthling.net (Matt Cashner) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: for the record :) Message-ID: just for the general record, my mysql/dbi/mod_perl problem turned out to be a pure mysql problem. the default timeout is 28800 seconds. just a bit long. trimmed that down and all is well. thanks all for the help. --------------------- Matt Cashner sungo@earthling.net --------------------- "Mediocrity: It takes a lot less time, and most people won't notice the difference until it's too late." From mawall0 at pop.uky.edu Thu Apr 13 23:12:51 2000 From: mawall0 at pop.uky.edu (Michael Wallace) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: How do you use CPAN? Message-ID: <3.0.6.16.20000413231251.307fdc0c@pop.uky.edu> Could someone give me a good description on how to use CPAN? I am a newbie in this Perlish world, and need some help getting some modules. Specifically, I do not have root permission on the box I'm using, and so I want to install the modules under my personal directory. How do I direct the install to install in my directory and not in /path/to/where/perl/is/installed/ ?? Secondly, once I get the modules installed, what do I need to do to get my program to locate the modules since they are in an uncommon place (i.e. my directory)?? Michael From fprice at mis.net Thu Apr 13 22:33:04 2000 From: fprice at mis.net (Frank Price) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: How do you use CPAN? Message-ID: <20000413233304.D836@localhost.localdomain> On Thu, Apr 13, 2000 at 11:12:51PM +0000, Michael Wallace wrote: > Could someone give me a good description on how to use CPAN? I am a newbie > in this Perlish world, and need some help getting some modules. > Specifically, I do not have root permission on the box I'm using, and so I > want to install the modules under my personal directory. How do I direct > the install to install in my directory and not in > /path/to/where/perl/is/installed/ ?? The way I usually do this is to build the module "by hand." Another way, and a very nice one, is to use the CPAN module itself -- but I don't know how to make it install somewhere different and a quick 'perldoc CPAN' didn't help. Maybe someone knows? Anyway, I assume you can find your module du jour and download into someplace like ~/tmp/. Then do this (*nix bias): $ cd ~/tmp/ $ tar xzvf Good-Module-6.6.6.tar.gz # uncompress and unpack $ cd Good-Module-6.6.6/ # $ perl Makefile.PL LIB=~/perllib # will install into ~/perllib $ make # create module $ make install # install it. > Secondly, once I get the modules > installed, what do I need to do to get my program to locate the modules > since they are in an uncommon place (i.e. my directory)?? Put this at the top of your program: use lib '/home/me/perllib'; Note that the ~ doesn't expand; neither does $ENV{'USER'}. For more info run 'perldoc perlmodinstall'. HTH, -Frank. -- Frank Price -oOo- fprice@mis.net -oOo- www.sxse.org/fprice/ GPG fingerprint: A34A 793E A408 9096 DA0C 33BA 164D 7F6D 3960 C7A9 GPG key: www.sxse.org/fprice/gpg.asc From rbowen at rcbowen.com Fri Apr 14 07:26:22 2000 From: rbowen at rcbowen.com (Rich Bowen) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: How do you use CPAN? References: <3.0.6.16.20000413231251.307fdc0c@pop.uky.edu> Message-ID: <38F70E6E.2CD84030@rcbowen.com> Michael Wallace wrote: > > Could someone give me a good description on how to use CPAN? I am a newbie > in this Perlish world, and need some help getting some modules. > Specifically, I do not have root permission on the box I'm using, and so I > want to install the modules under my personal directory. How do I direct > the install to install in my directory and not in > /path/to/where/perl/is/installed/ ?? Secondly, once I get the modules > installed, what do I need to do to get my program to locate the modules > since they are in an uncommon place (i.e. my directory)?? I wrote up a little document about this: http://www.rcbowen.com/imho/perl/modules.html Rich -- http://www.ApacheUnleashed.com/ Lexington Perl Mongers - http://lexington.pm.org/ PGP Key - http://www.rcbowen.com/pgp.txt From repett0 at sac.uky.edu Sun Apr 16 23:30:44 2000 From: repett0 at sac.uky.edu (repett0@sac.uky.edu) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: tetris Message-ID: Just to motivate everyone, someone has taken a little known game(tetris), :) and put it on a building, here is the direct video link so you don't have to get bogged down on the main site. http://bastilleweb.techhouse.org/live.html Ron From jalexander at toyolexky.com Tue Apr 18 16:28:11 2000 From: jalexander at toyolexky.com (Joe Alexander) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: cgi script Message-ID: I was told by Prof. Marek of UK that you might be able to help me with a particular project I want to pull off. The trouble is, I don't have necessary programming expertise. First, could you tell me exactly what your org does, and what type of people comprise this org. Just curious. As for myself, I'm a graduate of UK, and am trying to get a website going, and as part of that, I will have a survey given online which requires some programming. If you can help, or are interested, here's an explanation of what I need: The idea is in three parts. First, collect from a finite number of respondents the answers to 40-question multiple-choice survey, and store the results in a database on a server. The second part is to provide the same 40-question survey (over the net) to an unlimited number of respondents. Thirdly, the results (by each question) then are automatically compared to the pre-existing results, and the program generates the best match between the live respondent and the pre-existing results. This match is then shown to the live respondent: ?Your answers most closely match so-and-so?s answers.? Thank you. Joe Alexander (859) 231-9854, ext. 29 502-535-5351 (home) From fprice at mis.net Tue Apr 18 17:14:43 2000 From: fprice at mis.net (Frank Price) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: cgi script Message-ID: <20000418181443.B9599@localhost.localdomain> On Tue, Apr 18, 2000 at 05:28:11PM -0400, Joe Alexander wrote: > I was told by Prof. Marek of UK that you might be able to help me with a > particular project I want to pull off. The trouble is, I don't have > necessary programming expertise. > > First, could you tell me exactly what your org does, and what type of people > comprise this org. Just curious. Well, it's hard to speak for the list, but essentially we're a users group, and what we use is the Perl language. So we discuss programming and other perl issues on this list and also via a monthly meeting. As for composition, it's a mix of students, professionals, and probably some who are both/neither. Pretty safe, eh?-) > If you can help, or are interested, here's an explanation of what I need: I know some of us do consulting. If you are interested in someone to write this for you, that's probably your best bet. If you just want to talk about ideas and ways of doing things and what makes perl good for them, that seems appropriate for the list. > > The idea is in three parts. First, collect from a finite number of > respondents the answers to 40-question multiple-choice survey, and store the > results in a database on a server. The second part is to provide the same > 40-question survey (over the net) to an unlimited number of respondents. > Thirdly, the results (by each question) then are automatically compared to > the pre-existing results, and the program generates the best match between > the live respondent and the pre-existing results. This match is then shown > to the live respondent: ?Your answers most closely match so-and-so?s > answers.? It doesn't sound too tough. Probably the hardest part will be determining conceptually what constitutes a "best" match. If you have a good idea about that, implementing it might not be too hard. That's easy to say from here :-) -Frank. -- Frank Price | fprice@mis.net | www.sxse.org/fprice/ GPG key: www.sxse.org/fprice/gpg.asc | E Pluribus Unix From oneiros at dcr.net Wed Apr 19 07:12:20 2000 From: oneiros at dcr.net (Joe Hourcle) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: cgi script In-Reply-To: <20000418181443.B9599@localhost.localdomain> Message-ID: On Tue, 18 Apr 2000, Frank Price wrote: > On Tue, Apr 18, 2000 at 05:28:11PM -0400, Joe Alexander wrote: > > The idea is in three parts. First, collect from a finite number of > > respondents the answers to 40-question multiple-choice survey, and store the > > results in a database on a server. The second part is to provide the same > > 40-question survey (over the net) to an unlimited number of respondents. > > Thirdly, the results (by each question) then are automatically compared to > > the pre-existing results, and the program generates the best match between > > the live respondent and the pre-existing results. This match is then shown > > to the live respondent: “Your answers most closely match so-and-so’s > > answers.” > > It doesn't sound too tough. Probably the hardest part will be > determining conceptually what constitutes a "best" match. If you have > a good idea about that, implementing it might not be too hard. That's > easy to say from here :-) I'd have to agree on that one. It's one thing to say 'this person has 38 of the 40 the same as you', and it's another to have each question being a ranking from 1-10, and so, you might do something wierd such as a sum of the difference of squares to find the closest match. (so 3 questions that are 1 off on the scale is considered a closer match than 1 that's 2 off, or something of that sort) And of course, there's the issue of what to do if you just happen to get people from your original surveying who have the exact same set of answers. [however, what this is reminding me of is the 'which star wars character are you most like' web page....I think it might have been at Brunching Shuttlecocks , as they tend to have stuff like that.] ----- Joe Hourcle From hempy at ket.org Wed Apr 19 20:16:40 2000 From: hempy at ket.org (David Hempy) Date: Thu Aug 5 00:05:45 2004 Subject: LPM: ATP (All Terrain Perl) Message-ID: <4.3.1.2.20000419205238.02466190@mail.ket.org> I put a new (for me) spin on a perl program today. Nothing ground breaking here, but a nice little collection of tricks. I've got a program that copies log files from several servers to a central location for log analysis. But that's not the interesting part. It can be run seamlessly as a CGI script, or from the command line. After a few failed attempts, I came up with the following approach: To determine if I am running as CGI, I just look at $ENV{REMOTE_ADDR}. (Any cgi-specific environment variable will do.) If it is true, all I do in this script is blurt out a Content-type line and "
".  From there, my command-line intended print statements work just fine in the browser with no modification.  

I could do some pretty html stuff if $cgi, but this is a utility page.  Plain old courier is good enough.

Another nifty trick for a cgi script is setting $|=1;  This turns buffering off and makes your web page print to the browser in real time, instead of spitting out the entire web page after the job has completed.  This looks more like the paced output we're used to seeing at the command line.  Great for tasks that more than a second or two so you're not staring at the "Loading" animation wondering if your script is really doing anything.

One thing I wanted to do is modify its behavior depending on whether it is run interactively from the command line, or by an NT service (cron specifically).  

The Perl Cookbook suggests:
>15.2. Testing Whether a Program Is Running Interactively
>
>Problem
>
>You want to know whether your program is being called interactively or not. For instance, a user running your program from a
>shell is interactive, whereas the program being called from cron is not.
>
>Solution
>
>Use -t to test STDIN and STDOUT: 
>
>sub I_am_interactive {
>     return -t STDIN && -t STDOUT;
>}
>
>
>
>Discussion
>
>The -t operator tells whether the filehandle or file is a tty device. Such devices are signs of interactive use.


Unfortunately, this doesn't work on NT.  The -t tests return true even when run by a service.  (Note that we're using a third party cron service implementation, not Microsoft's bothersome AT scheduler)

I hacked around this by looking for a command argument.  I provide just such an argument in the cron file, whereas I don't (though I could) from the command line.  Of course, there is no argument when called from a CGI script.

Anybody have any ideas on how to test for interactivity on NT?  I'd like to tidy that part up a bit.



You can see the results here, while simultaneously putting unnecessary strain on our servers.  (Oh Joy!)

         http://edit-www.ket.org/cgi-bin/getlogs.pl

For what it's worth, here's the whole script:



## Script to pull down log files from various servers.
## Deletes logs from remote servers after they are too old. (but not locally)

## This script may be run from the command line, cron, or as a cgi program.
## If any command line parameters are present, actions are logged to a logfile.

use strict;
use Time::localtime;
use File::Copy;


my ($cgi) = $ENV{REMOTE_ADDR};
         ## If it has any value, then we are running as CGI.

if ($cgi) {
         print "Content-type: text/html\n\n
                 $0 - Collect log files
                 
\n";
}

my (%sites, $site, @files, $file, $destdir, $destfile);


my $year = "" . (localtime->year + 1900);

my $stale_days = 31;            ## Older than this can be deleted from source server.

         ## loglogfile is a log of the file transfers.
my ($loglogfile) = '\\\\2edit\\logs\\getlog.log';


if (@ARGV > 0) {
                 ## If any paramters given, Then send output to logfile.
         print "Logging to $loglogfile\n";
         open (LOGLOG, ">>$loglogfile")  or warn "WARNING: Can't append to $loglogfile\n";
         select(LOGLOG);
}

$| = 1; ## Turn off buffering.

print scalar ctime;
print " $0 Starting.\n";


%sites = (
         ket     => '\\\\1webserver\\ket-logs' ,
         dl      => '\\\\2live\\logs\\dl-logs' ,
         mim     => '\\\\5SERC\\suitespot\\https-mim-live\\logs',
         serc    => '\\\\5SERC\\suitespot\\https-serc-live\\logs',
         "edit-www"      => '\\\\2edit\\suitespot\\https-edit-www\\logs',
);




foreach $site (keys %sites) {
         # print "$site \t$sites{$site}\n";
         
         
         my $count=0;
         
         my ($tested, $copied, $deleted) = (0,0,0);
         
         @files = (glob ($sites{$site} . "\\access*") , glob ( $sites{$site} . "\\errors*"));

         $destdir = "\\\\2edit\\logs\\$site\\";
         
         mkdir ($destdir, 0666) unless (-e $destdir);
         
         foreach $file (@files) {
                 $tested++;
                 
                 $file =~ /\\([^\\]+)$/;
                 $destfile = "$destdir$1";

                 # print STDERR ".";             

                 #print "test $file,\t$destfile\t" . (-s $file) . "," . (int -M $file) . "\n";

                 #last if (++$count>=6); ## for impatient developing.

                 if ((-s $file != -s $destfile) || !-e $destfile ) {
                         # If the sizes are the same, assume the files are the same.
                         # More reliable than checking dates, I suspect.
                         print "copy $file -> $destfile\n";
                         copy($file, $destfile) or warn "ERROR: Can't copy($file, $destfile) \n";
                         $copied++;
                 }
                 

                 if ( ((-M $file) > $stale_days) &&      (-s $file == -s $destfile) ) {
                                 # If it's really old and we have a good copy, delete the source.
                         # print "TODO: delete old (" . int(-M $file)  . " days) $file\n";
                         # unlink $file  or warn "ERROR: Can't delete $file\n";
                         $deleted++;
                 } 
                 
                                 
                 
         }
         
         printf "Site: %-10s tested:%4d copied:%2d deleted:%2d (not deleting yet) =============\n", 
                 $site, $tested, $copied, $deleted;
         
}


print scalar ctime;
print " $0 Ending.\n\n";


if ($cgi) {
         print "
Go back to where you once belonged.\n\n";
}







-- 
David Hempy 
Internet Database Administrator
Kentucky Educational Television
 -- (606)258-7164 -- (800)333-9764


From oneiros at dcr.net  Thu Apr 20 09:36:33 2000
From: oneiros at dcr.net (Joe Hourcle)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: ATP (All Terrain Perl)
In-Reply-To: <4.3.1.2.20000419205238.02466190@mail.ket.org>
Message-ID: 



On Wed, 19 Apr 2000, David Hempy wrote:

> To determine if I am running as CGI, I just look at $ENV{REMOTE_ADDR}.  
> (Any cgi-specific environment variable will do.)  If it is true, all I
> do in this script is blurt out a Content-type line and
> "
".  From there, my command-line intended print
> statements work just fine in the browser with no modification.

Although it doesn't quite apply in your case (as you're giving it a
 and some HTML at the bottom to close <PRE> and let the person go
back), some people something like this may want to just send:

	Content-type: text/plain\n\n

(which any intelligent browser will accept as being a plain text file, and
not try to format it, which is good if you're dumping massive files this
way)

of course, it's still good to put some sort of an 'end marker' just to let
the person know that you've finished.

> Another nifty trick for a cgi script is setting $|=1;  This turns
> buffering off and makes your web page print to the browser in real
> time, instead of spitting out the entire web page after the job has
> completed.  This looks more like the paced output we're used to seeing
> at the command line.  Great for tasks that more than a second or two
> so you're not staring at the "Loading" animation wondering if your
> script is really doing anything.

if you're using an older server, you may have to make sure that the CGI
starts with 'nph-' (so the server doesn't decide to buffer it).  Recent
versions of apache don't do it, but I can't remember when they made that
change.  (I can't remember how netscape server behaves, and have no clue
as to IIS)

-----
Joe Hourcle


From billy at cre8tivegroup.com  Thu Apr 20 13:38:45 2000
From: billy at cre8tivegroup.com (billy@cre8tivegroup.com)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: mod_auth_mysql
In-Reply-To: <000201bf9d0b$84ab8ea0$080614ac@student.asbury.edu>
Message-ID: <XFMail.000420143845.billy@cre8tivegroup.com>

Question #1:
I am looking for any information on how to handle the groups with
mod_auth_mysql.  All the information that I have found deal with setting up the
users list.  I would also like any other information that someone might have on
mod_auth_mysql.  

Question #2:
        In trying to run configure I get kicked out when looking for
apache/httpd.h I checked to make sure it was looking in the correct place and
it was.  My question to anyone, "is there a certain version of apache that you
have to have or higher for this to work?"

Thanks,
Billy Marlin

From hempy at ket.org  Thu Apr 20 14:41:47 2000
From: hempy at ket.org (David Hempy)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: ATP (All Terrain Perl)
In-Reply-To: <Pine.BSF.4.21.0004201027160.23854-100000@andrew.dcr.net>
References: <4.3.1.2.20000419205238.02466190@mail.ket.org>
Message-ID: <4.3.1.2.20000420154108.025ac290@mail.ket.org>

At 10:36 AM 4/20/00 -0400, you wrote:
>if you're using an older server, you may have to make sure that the CGI
>starts with 'nph-' (so the server doesn't decide to buffer it).

What starts with 'nph-'?  The script name?

-dave



--
David Hempy
Internet Database Administrator
Kentucky Educational Television
<hempy@ket.org> -- (606)258-7164 -- (800)333-9764


From oneiros at dcr.net  Thu Apr 20 15:20:58 2000
From: oneiros at dcr.net (Joe Hourcle)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: ATP (All Terrain Perl)
In-Reply-To: <4.3.1.2.20000420154108.025ac290@mail.ket.org>
Message-ID: <Pine.BSF.4.21.0004201610280.71647-100000@andrew.dcr.net>



On Thu, 20 Apr 2000, David Hempy wrote:

> At 10:36 AM 4/20/00 -0400, you wrote:
> >if you're using an older server, you may have to make sure that the CGI
> >starts with 'nph-' (so the server doesn't decide to buffer it).
> 
> What starts with 'nph-'?  The script name?

Yep.  It's for 'Non Parsed Headers'

Although, now that I think about it, I think you're also required to
return a status code if your script's to be nph, so you'd have to
instead print:

	$ENV{'SERVER_PROTOCOL'} 200 OK
	Server: $ENV{'SERVER_SOFTWARE'}
	Content-type: text/plain

(and of course, an extra newline to end the headers.)
	

-----
Joe Hourcle


From hempy at ket.org  Fri Apr 21 12:20:53 2000
From: hempy at ket.org (David Hempy)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Fwd: Contest!
Message-ID: <4.3.1.2.20000421131142.04b15bd0@mail.ket.org>

 From our western neighbors...

>Date: Thu, 20 Apr 2000 23:08:47 -0500
>Subject: Contest!
>From: "Janine Ladick" <jladick@bellsouth.net>
>To: Louisville Perl Mongers List <louisville-pm-list@happyfunball.pm.org>
>
>Hello, List!
>
>One of our group members has issued a challenge:  to craft a program that
>converts any base 10 number to its base x equivalent (where x is
>user-specified).  In the spirit of All Things Perl, we'll offer a prize to
>the person who comes up with the most concise correct solution.  (Extra
>bonus points will be awarded if your program will convert a base y number to
>base x.)
>
>Let's give this a realistic deadline...say, one week.  At our next meeting
>we'll review submissions and decide the winner.
>
>Good luck, and see you next week!  (Same time and place as usual - Cafe
>Mimosa at 7:00 pm next Thursday.)
>
>Janine


--
David Hempy
Internet Database Administrator
Kentucky Educational Television
<hempy@ket.org> -- (606)258-7164 -- (800)333-9764


From repett0 at sac.uky.edu  Fri Apr 21 13:16:32 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Fwd: Contest!
In-Reply-To: <4.3.1.2.20000421131142.04b15bd0@mail.ket.org>
Message-ID: <Pine.HPP.3.92.1000421141607.15140D-100000@sac.uky.edu>


If we do this can I send the program with someone, I have finals to do.  I
have a book on how to do this :)
Ron


On Fri, 21 Apr 2000, David Hempy wrote:

>  From our western neighbors...
>
> >Date: Thu, 20 Apr 2000 23:08:47 -0500
> >Subject: Contest!
> >From: "Janine Ladick" <jladick@bellsouth.net>
> >To: Louisville Perl Mongers List <louisville-pm-list@happyfunball.pm.org>
> >
> >Hello, List!
> >
> >One of our group members has issued a challenge:  to craft a program that
> >converts any base 10 number to its base x equivalent (where x is
> >user-specified).  In the spirit of All Things Perl, we'll offer a prize to
> >the person who comes up with the most concise correct solution.  (Extra
> >bonus points will be awarded if your program will convert a base y number to
> >base x.)
> >
> >Let's give this a realistic deadline...say, one week.  At our next meeting
> >we'll review submissions and decide the winner.
> >
> >Good luck, and see you next week!  (Same time and place as usual - Cafe
> >Mimosa at 7:00 pm next Thursday.)
> >
> >Janine
>
>
> --
> David Hempy
> Internet Database Administrator
> Kentucky Educational Television
> <hempy@ket.org> -- (606)258-7164 -- (800)333-9764
>


From repett0 at sac.uky.edu  Fri Apr 21 13:52:33 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Lexington Linux Lan Wars
Message-ID: <Pine.HPP.3.92.1000421145017.22299B-100000@sac.uky.edu>


For those who are into gaming, we are having a Lan War tonight at 6pm
188 Mountmullen Rd. (The road neXt to Pizza hut on limestone).  We are
going to be playing the following an then some

quake III & II
starcraft & broodwars
warcraft II
some others...

Some bring it if your good enough :)
Ron
UKLUG



From rbowen at rcbowen.com  Sun Apr 23 20:35:13 2000
From: rbowen at rcbowen.com (Rich)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Access to the clipboard (Linux)
Message-ID: <3903A4D1.4B2C1D@rcbowen.com>

There's a nice Win32 module that gives access to the clipboard. It's
enormously useful, as you can copy something to the clipboard, run a
Perl program, and paste the modified stuff back into something. I'd like
to be able to do the same thing on Linux. Are any of you aware of a
module that would permit this?

Rich
-- 
Director of Web Application Development  -  The Creative Group
                                 http://www.cre8tivegroup.com/
Author - Apache Server Unleashed - http://apacheunleashed.com/



From mawall0 at sac.uky.edu  Mon Apr 24 12:55:24 2000
From: mawall0 at sac.uky.edu (Michael Wallace)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Perl Poetry Contest
Message-ID: <Pine.HPP.3.92.1000424134952.25152A-100000@sac.uky.edu>

I ran across the results to the Perl Poetry Contest today.  This appeared
in Volume 4, Issue 4 of the Perl Journal.  For those you  who haven't seen
it, here are the results of the contest:

http://www.itknowledge.com/tpj/contest-poetry.html

Michael


From repett0 at sac.uky.edu  Mon Apr 24 19:58:09 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
Message-ID: <Pine.HPP.3.92.1000424205403.18743H-100000@sac.uky.edu>


Im tired of getting stuck in java trying to read files in applets.  So
here is my problem and Im getting strapped for time so maybe someone here
can help.

I have a database called test, table called testac and fields

id int,
name varchar(25),
suffix varchar(5),
file blob,
notes blob;

I need to store html files into blob, so I can use another program to
access them.  Supposedly there is some mysql commands to do this but I
can' get them to work.  PLEASE SAVE ME....:)

Thanks
Ron


From mawall0 at sac.uky.edu  Mon Apr 24 20:15:39 2000
From: mawall0 at sac.uky.edu (Michael Wallace)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
In-Reply-To: <Pine.HPP.3.92.1000424205403.18743H-100000@sac.uky.edu>
Message-ID: <Pine.HPP.3.92.1000424210212.27999A-100000@sac.uky.edu>

Why don't you use a text column instead of blob?  Text is essentially a
varchar which has the same capacity as a blob.  It would make what you're
trying to accomplish much easier since you don't have to deal with all the
binary stuff.

Michael

> I need to store html files into blob, so I can use another program to
> access them.  Supposedly there is some mysql commands to do this but I
> can' get them to work.  PLEASE SAVE ME....:)


From repett0 at sac.uky.edu  Mon Apr 24 20:19:42 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
In-Reply-To: <Pine.HPP.3.92.1000424210212.27999A-100000@sac.uky.edu>
Message-ID: <Pine.HPP.3.92.1000424211837.18743L-100000@sac.uky.edu>


thats fine, so how do you do it with text, as far as I can understand,
everytime you load it.. it parses it somehow so to fill the fields, I want
to make sure the whole file gets in the text/blob...  My mistake text is
better.

Ron


On Mon, 24 Apr 2000, Michael Wallace wrote:

> Why don't you use a text column instead of blob?  Text is essentially a
> varchar which has the same capacity as a blob.  It would make what you're
> trying to accomplish much easier since you don't have to deal with all the
> binary stuff.
>
> Michael
>
> > I need to store html files into blob, so I can use another program to
> > access them.  Supposedly there is some mysql commands to do this but I
> > can' get them to work.  PLEASE SAVE ME....:)
>


From hempy at ket.org  Mon Apr 24 20:21:01 2000
From: hempy at ket.org (David Hempy)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
In-Reply-To: <Pine.HPP.3.92.1000424205403.18743H-100000@sac.uky.edu>
Message-ID: <4.3.1.2.20000424212045.05073d20@mail.ket.org>

At 08:58 PM 4/24/00 -0400, you wrote:

>Im tired of getting stuck in java trying to read files in applets.  So
>here is my problem and Im getting strapped for time so maybe someone here
>can help.
>
>I have a database called test, table called testac and fields
>
>id int,
>name varchar(25),
>suffix varchar(5),
>file blob,
>notes blob;
>
>I need to store html files into blob, so I can use another program to
>access them.  Supposedly there is some mysql commands to do this but I
>can' get them to work.  PLEASE SAVE ME....:)
>
>Thanks
>Ron

What database are you using?  Are you using DBI?

-dave


--
David Hempy
Internet Database Administrator
Kentucky Educational Television
<hempy@ket.org> -- (606)258-7164 -- (800)333-9764


From repett0 at sac.uky.edu  Tue Apr 25 09:05:06 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
In-Reply-To: <4.3.1.2.20000424212045.05073d20@mail.ket.org>
Message-ID: <Pine.HPP.3.92.1000425100429.22053B-100000@sac.uky.edu>

mysql is the database, whats dbi?
Ron


On Mon, 24 Apr 2000, David Hempy wrote:

> At 08:58 PM 4/24/00 -0400, you wrote:
>
> >Im tired of getting stuck in java trying to read files in applets.  So
> >here is my problem and Im getting strapped for time so maybe someone here
> >can help.
> >
> >I have a database called test, table called testac and fields
> >
> >id int,
> >name varchar(25),
> >suffix varchar(5),
> >file blob,
> >notes blob;
> >
> >I need to store html files into blob, so I can use another program to
> >access them.  Supposedly there is some mysql commands to do this but I
> >can' get them to work.  PLEASE SAVE ME....:)
> >
> >Thanks
> >Ron
>
> What database are you using?  Are you using DBI?
>
> -dave
>
>
> --
> David Hempy
> Internet Database Administrator
> Kentucky Educational Television
> <hempy@ket.org> -- (606)258-7164 -- (800)333-9764
>


From mawall0 at pop.uky.edu  Tue Apr 25 10:59:26 2000
From: mawall0 at pop.uky.edu (Michael Wallace)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: jdbc and applet wooos
In-Reply-To: <Pine.HPP.3.92.1000425100429.22053B-100000@sac.uky.edu>
References: <4.3.1.2.20000424212045.05073d20@mail.ket.org>
Message-ID: <3.0.6.16.20000425105926.33e73698@pop.uky.edu>

DBI is Perl's database interface.  I noticed in your emails you've
mentioned java and jdbc.  Are you trying to use Java or are you trying to
redesign your program in Perl?  If you're attempting the former, I don't
believe you'll get that much help from us since we are mainly Perl
programmers.

Michael

At 10:05 AM 4/25/2000 -0400, you wrote:
>mysql is the database, whats dbi?
>Ron


From aaron at iglou.com  Wed Apr 26 14:08:06 2000
From: aaron at iglou.com (AARON B. DOSSETT)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Expect-like functionality without "use"ing Expect
Message-ID: <E12kXAN-0002M5-00@iglou.com>

All,

I'm in a bit of a bind.  I need to have some Expect-like functionality in a 
perl script on a system that a) doesn't have Expect installed and b) doesn't
have the Perl Expect module installed.  I only want a very small bit of
Expect functionality.  I need to capture output from a command executed with
"sudo" which may or may not prompt me for a password.  Any suggestions on how
to do this with just the perl core (5.004_04) ?

Thanks,

Aaron

From sml at zfx.com  Wed Apr 26 14:23:42 2000
From: sml at zfx.com (Steve Lane)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Expect-like functionality without "use"ing Expect
References: <E12kXAN-0002M5-00@iglou.com>
Message-ID: <3907423D.1B37@zfx.com>

why don't you just install Expect.pm in your home dir?

or look for the ancient "chat2.pl" program, which makes for
some interesting reading even if you don't use it...

AARON B. DOSSETT wrote:
> I'm in a bit of a bind.  I need to have some Expect-like functionality in a
> perl script on a system that a) doesn't have Expect installed and b) doesn't
> have the Perl Expect module installed.  I only want a very small bit of
> Expect functionality.  I need to capture output from a command executed with
> "sudo" which may or may not prompt me for a password.  Any suggestions on how
> to do this with just the perl core (5.004_04) ?
--
Steve Lane <sml@zfx.com>

From sml at zfx.com  Wed Apr 26 14:23:42 2000
From: sml at zfx.com (Steve Lane)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: Expect-like functionality without "use"ing Expect
References: <E12kXAN-0002M5-00@iglou.com>
Message-ID: <3907423D.1B37@zfx.com>

why don't you just install Expect.pm in your home dir?

or look for the ancient "chat2.pl" program, which makes for
some interesting reading even if you don't use it...

AARON B. DOSSETT wrote:
> I'm in a bit of a bind.  I need to have some Expect-like functionality in a
> perl script on a system that a) doesn't have Expect installed and b) doesn't
> have the Perl Expect module installed.  I only want a very small bit of
> Expect functionality.  I need to capture output from a command executed with
> "sudo" which may or may not prompt me for a password.  Any suggestions on how
> to do this with just the perl core (5.004_04) ?
--
Steve Lane <sml@zfx.com>

From repett0 at sac.uky.edu  Fri Apr 28 21:17:43 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: java ?
Message-ID: <Pine.HPP.3.92.1000428221612.9693E-100000@sac.uky.edu>


I know this is perl, but since perl has a nice easy way to do this, Im
hoping someone knows the java way to do this.

1) convert a char into an int
2) convert a string into an int

I know I could do a system call and call a perl program to change my one
number and the return it, but you get the problem with doing that right :)

Thanks
Ron



From repett0 at sac.uky.edu  Sun Apr 30 12:30:12 2000
From: repett0 at sac.uky.edu (repett0@sac.uky.edu)
Date: Thu Aug  5 00:05:45 2004
Subject: LPM: partya
Message-ID: <Pine.HPP.3.92.1000430132909.10068F-100000@sac.uky.edu>


1).  Go see gladiator on friday(this friday :))
2).  Come back and cook out and discuss all things geek and non geek and
party.....

anyone interested...

Ron