RE: The True Path to Learning Perl Re: [OT] Education Level

I think that we've drifted a little from the topic, which was more or less to get a feel for the people on this list and where they are in their education, not to get in a "university vs. self-teaching" argument. Personally I don't think it would be pragmatic for most Perlers out there to learn e

Re: What are the dangers of leaving a cgi-bin directory CHMOD 777

On Dec 8, 2003, at 3:15 PM, Dan Anderson wrote: I have a perl script that writes to its directory, and as such the directory is CHMOD 777 in my cgi-bin. (Linux box) I figured this might be dangerous, but didn't think there was any harm in it. Am I right or will the script kiddies be a

Re: sorter script [was: Frustrated newbie question]

My next Perl task after I get my list of one name per line, is to sort the list and eliminate duplicate names. >>> >>> I have used the following script to sort and remove duplicate entries in >>> flat >>> text files. >>> >>> http://www.downloaddatabase.com/databasesoftware/db-sorter-s

Re: How to process multi-line records ?

Stuart Clemons wrote: > > Hi all: > > This newbie is back looking for some hints on how to handle this problem > in processing a file that has multiline records that look something like > this: > > Name: Joe Blow > DataField1: x > DateField1: 07/07/77 > DataField2: x > DateField2: 12/0

RE: Reading a log file, again

OP said: "From what I understand, your script looks for 'Total:' and then for following line with numbers, reads them and prints them. That is what I need. However, there are 3 sections with 'Total:' and I am interested only in one of them. " 2 preceding bits of info determine which is the right

Re: Syntax a little funny ....

[EMAIL PROTECTED] wrote: > > I've just started trying to pick up a little perl. > I'm breezing through "Learning Perl" and reading the perl docs. > > Here is some syntax I found a little funny, and I was hoping somebody > could explain this too me: > > opendir(DIR, $some_dir) || die "can't opend

Re: pid of process opened by system

On Dec 8, 2003, at 5:10 PM, [EMAIL PROTECTED] wrote: On Tue, Dec 09, 2003 at 01:04:01AM +0100, [EMAIL PROTECTED] wrote: eval { local $SIG{ALRM} = sub { die "alarm\n" }; alarm 10; system($prog, @args); alarm 0; }; if($@ =~ /alarm/) { # have to kill $prog; # I tried with 'use POSIX qw

Certification processes - Re: [OT] Education Level

On Dec 8, 2003, at 4:22 PM, Tom Kinzer wrote: http://perlcert.perlocity.org/ From: J Ingersoll Sent: Monday, December 08, 2003 4:16 PM [..] I'm working slowly towards the Linux Professional Institute's exams - it would be nice to put down on a resume also "Perl Certified" rather than "well I've

Re: What are the dangers of leaving a cgi-bin directory CHMOD 777

Dan Anderson wrote: > I have a perl script that writes to its directory, and as such > the directory is CHMOD 777 in my cgi-bin. (Linux box) I figured this > might be dangerous, but didn't think there was any harm in it. Am I > right or will the script kiddies be all over me? > > -Dan

Re: Reading a log file, again

Tom Kinzer wrote: > Try this: > > Caveat: This all assumes LOTS about the format of your data being > consistent, and so should be treated as a "quick and dirty" as opposed to > anything resembling a robust application... I'm not sure what your > intention with the script is, but is worth mention

Re: @INC paths on an IIS server

Ron Goral wrote: > I am testing some scripts on an IIS server and receive the following error > when I attempt to "use" a module: > > Can't locate DG_DatabaseManager.pm in @INC (@INC contains: C:/Perl/lib > C:/Perl/site/lib .) at c:\inetpub\wwwroot\cgi-bin\develop\shp_crt\test.cgi > line 9. > BEGI

RE: Can't find package AutoLoader in CGI::Application program

Nyimi... Thanks for your reply; I figured it out (there already was a '1' at the end of my module). I had used h2xs to create the module framework... that framework requires exporter and then exports the name 'AutoLoader'. Once I took that out, everything worked fine. Thanks again...jon Nyim

Re: pid of process opened by system

[EMAIL PROTECTED] wrote: > On Tue, Dec 09, 2003 at 01:04:01AM +0100, [EMAIL PROTECTED] > wrote: >> eval { >> local $SIG{ALRM} = sub { die "alarm\n" }; >> alarm 10; >> system($prog, @args); >> alarm 0; >> }; >> if($@ =~ /alarm/) { >> # have to kill $prog; > # I tried with 'use POSIX q

Re: Syntax a little funny ....

[EMAIL PROTECTED] wrote: > I've just started trying to pick up a little perl. > I'm breezing through "Learning Perl" and reading the perl docs. > > Here is some syntax I found a little funny, and I was hoping somebody > could explain this too me: > > opendir(DIR, $some_dir) || die "can't opendir $

Re: How to process multi-line records ?

[EMAIL PROTECTED] wrote: > Hi all: > > This newbie is back looking for some hints on how to handle this problem > in processing a file that has multiline records that look something like > this: > > Name: Joe Blow > DataField1: x > DateField1: 07/07/77 > DataField2: x > DateField2: 12/07

Re: sorter script [was: Frustrated newbie question]

Bryan Harris wrote: > > >> My next Perl task after I get my list of one name per line, is to sort the > >> list and eliminate duplicate names. > > > > I have used the following script to sort and remove duplicate entries in flat > > text files. > > > > http://www.downloaddatabase.com/databasesoftw

Re: pid of process opened by system

On Tue, Dec 09, 2003 at 01:04:01AM +0100, [EMAIL PROTECTED] wrote: > eval { > local $SIG{ALRM} = sub { die "alarm\n" }; > alarm 10; > system($prog, @args); > alarm 0; > }; > if($@ =~ /alarm/) { > # have to kill $prog; # I tried with 'use POSIX qw/sys_wait_h/;' my $kid = waitpid -1

CPAN DBD install problem

Hi, Got an error trying to install DBD::RAM on a 5.8.2 version of perl. The following is the output: ... CPAN.pm: Going to build J/JZ/JZUCKER/DBD-RAM-0.072.tar.gz Checking for DBI, 1.00 or later ... ok Checking for DBD::File ... ok Checking for SQL::Statement, 0.1011 or later ... ok Checking if

RE: [OT] Education Level

http://perlcert.perlocity.org/ -Original Message- From: J Ingersoll [mailto:[EMAIL PROTECTED] Sent: Monday, December 08, 2003 4:16 PM To: Perl Beginner's List Subject: RE: [OT] Education Level --- Wiggins d Anconia <[EMAIL PROTECTED]> wrote: > > > > looking to break out of a > > non-c

RE: [OT] Education Level

--- Wiggins d Anconia <[EMAIL PROTECTED]> wrote: > > > > looking to break out of a > > non-challenging career in mainframe work :^> ) > > > > On my "own", meaning no formal education in Perl. I got my start on the > job from 2 programmers that came before me (which is why it wasn't > really on

pid of process opened by system

Hello, I'm doing this: eval { local $SIG{ALRM} = sub { die "alarm\n" }; alarm 10; system($prog, @args); alarm 0; } if($@ =~ /alarm/) { # have to kill $prog; } The problem is, that the process is still running after the perl script has exited. And I have to kill it by hand. But I want p

RE: How to process multi-line records ?

Nice. Don't forget to "get along well with the other children" by putting $/ back! -Tom Kinzer -Original Message- From: Kevin Pfeiffer [mailto:[EMAIL PROTECTED] Sent: Monday, December 08, 2003 1:52 PM To: [EMAIL PROTECTED] Subject: Re: How to process multi-line records ? Hi Perl-List!

good example of top-posting problem [Was RE: sorter script [was: Frustrated newbie question]]

Hi Tom, Tom Kinzer top-posted: > *Consciously* making the decision that your script will no longer be > portable... > > my $2Cents; > > -Tom Kinzer > -Original Message- > From: Bryan Harris [mailto:[EMAIL PROTECTED] > Sent: Sunday, December 07, 2003 5:32 PM > To: Beginners Perl > Subje

Re: How to process multi-line records ?

Hi Perl-List! Stuart Clemons wrote: [...] > > Name: Joe Blow > DataField1: x > DateField1: 07/07/77 > DataField2: x > DateField2: 12/07/03 > > Name: Fi Doe > DataField1: x > DateField1: 08/08/88 > DataField2: x > DateField2: 12/12/03 > > etc. > > There is an empty line that

What are the dangers of leaving a cgi-bin directory CHMOD 777

I have a perl script that writes to its directory, and as such the directory is CHMOD 777 in my cgi-bin. (Linux box) I figured this might be dangerous, but didn't think there was any harm in it. Am I right or will the script kiddies be all over me? -Dan -- To unsubscribe, e-mail:

Re: The True Path to Learning Perl Re: [OT] Education Level

On Mon, Dec 08, 2003 at 12:43:37PM -0800 drieux wrote: > Learn to be nice to undergrads and grad students. > Think about the unpleasant lack of experience that > they have in a wide range of issues. Most of them > grew up in normal homes with median types of families. > ALL they have to 'validate

Getting a local file

I am using mod_perl with Apache 1.3 (Win32) and am having difficulty with the following code. -- use CGI; use Data::Dumper; use HTTP::Request; use LWP::UserAgent; my $q = new CGI; $ua = new LWP::UserAgent; $site = 'http://www.example.com/'; print $q->header; # create the HTTP heade

Re: How to verify whether a directory exists

"B. Fongo" <[EMAIL PROTECTED]> wrote: > I tried several alternatives to solve the problem, but failed. In most > cases, the script couldn't create a directory if there is a text file > with the same name. Rob's suggestion works better; except that it > overrides the directory without warning -

Re: @INC paths on an IIS server

On Dec 8, 2003, at 10:41 AM, Jenda Krynicky wrote: From: "Ron Goral" <[EMAIL PROTECTED]> [..] It appears that the "." directory is in @INC, but the script cannot find it even though DG_DatabaseManager.pm is in the same directory as test.cgi. Am I wrong in thinking that "." represents the "c:\inet

Re: How to verify whether a directory exists

I tried several alternatives to solve the problem, but failed. In most cases, the script couldn't create a directory if there is a text file with the same name. Rob's suggestion works better; except that it overrides the directory without warning - if it already existing. But it remians some ho

Re: The True Path to Learning Perl Re: [OT] Education Level

On Dec 8, 2003, at 11:18 AM, Jason Dusek wrote: [..] I think drieux has raised a good point in taking a shot at the 'learning how to think' snobbery too common among college graduates. [..] It is not so much a shot at 'snobbery' as it is at the lack of 'intellectual rigor' that the phrase bleats l

RE: Reading a log file, again

Tom Kinzer <[EMAIL PROTECTED]> wrote: > Try this: > > Caveat: This all assumes LOTS about the format of your data being > consistent, and so should be treated as a "quick and dirty" as opposed to > anything resembling a robust application... I'm not sure what your > intention with the script is,

RE: Reading a log file, again

Try this: Caveat: This all assumes LOTS about the format of your data being consistent, and so should be treated as a "quick and dirty" as opposed to anything resembling a robust application... I'm not sure what your intention with the script is, but is worth mentioning. -Tom Kinzer __SNIP__ m

Re: Using Perl for English Grammar

On Dec 8, 2003, at 1:33 AM, Jane Langley wrote: [..] I am interested in using Perl to generate proper English grammatical sentences from a set "list of words" and NOT from texts. [..] I think a part of the problem is sorting out what "proper english grammatical sentences" be about in the first pla

Re: [OT] Education Level

Hi All, I think drieux has raised a good point in taking a shot at the 'learning how to think' snobbery too common among college graduates. It is a sad fact that college has very little to do with thinking or learning - rather it is all about: a) patience with idiots b) conformance to rules

Re: stripping last field of a carriage return

On Dec 7, 2003, at 7:02 PM, Paul Johnson wrote: On Sun, Dec 07, 2003 at 06:39:50PM -0800, drieux wrote: On Dec 7, 2003, at 5:40 PM, Bryan Harris wrote: [..] I have tried to strip the carriage return of the last field $field[8] =~ s/\015//g; Uh, isn't the carriage return code 13? our $CRLF = "\015\

The True Path to Learning Perl Re: [OT] Education Level

On Dec 8, 2003, at 7:19 AM, J Ingersoll wrote: [..] I'd like to know how many in the list - employed for their perl skills - learned perl on their own (practice, forums, books, et. al. ) and how many attended formal classes ...? [..] first off you really SHOULD NOT scare people with phrases like

Re: @INC paths on an IIS server

From: "Ron Goral" <[EMAIL PROTECTED]> > I am testing some scripts on an IIS server and receive the following > error when I attempt to "use" a module: > > Can't locate DG_DatabaseManager.pm in @INC (@INC contains: C:/Perl/lib > C:/Perl/site/lib .) at > c:\inetpub\wwwroot\cgi-bin\develop\shp_crt\te

Re: Syntax a little funny ....

James Edward Gray II <[EMAIL PROTECTED]> wrote: > On Dec 8, 2003, at 11:28 AM, Jeff Westman wrote: > > > [EMAIL PROTECTED] wrote: > > > >> Here is some syntax I found a little funny, and I was hoping somebody > >> could explain this too me: > >> > >> opendir(DIR, $some_dir) || die "can't opendir

@INC paths on an IIS server

I am testing some scripts on an IIS server and receive the following error when I attempt to "use" a module: Can't locate DG_DatabaseManager.pm in @INC (@INC contains: C:/Perl/lib C:/Perl/site/lib .) at c:\inetpub\wwwroot\cgi-bin\develop\shp_crt\test.cgi line 9. BEGIN failed--compilation aborted a

Re: [OT] Education Level

[EMAIL PROTECTED] wrote: Hello, Hi Charles, A recent job posting has left me curious. I would never take a full time job as a programmer or as anything else for that matter. I just don't make a good employee any more. Been there. Done that. The job posting demanded a college degree. I had

Re: Syntax a little funny ....

On Dec 8, 2003, at 11:28 AM, Jeff Westman wrote: [EMAIL PROTECTED] wrote: Here is some syntax I found a little funny, and I was hoping somebody could explain this too me: opendir(DIR, $some_dir) || die "can't opendir $some_dir: $!"; @dots = grep { /^\./ && -f "$some_dir/$_" } readdir(DIR); closed

RE: Can't find package AutoLoader in CGI::Application program

Try putting 1; As the last line of your GroupRank.pm file. Remember that a module (*.pm file) is supposed to return a true value. José. -Original Message- From: david [mailto:[EMAIL PROTECTED] Sent: Monday, December 08, 2003 7:06 PM To: [EMAIL PROTECTED] Subject: Re: Can't find package

perl and qmail aliases

I wrote a Perl script that runs a query against a MySQL db to get a list of customer email addresses. This script then takes a full email for input and rewrites the 'To' header and sends it with qmail-inject for each email address from the db. I have an alias set up in qmail that pipes anything

Re: Can't find package AutoLoader in CGI::Application program

Jon Seidel wrote: [snip] > The beginning of my GroupRank.pm file looks like this: > /// > package GroupRank; > use base 'CGI::Application'; > use AutoLoader; > #use DBI; > > use strict; > use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); > $|++; your GroupRank.pm module doesn't see

RE: [OT] Education Level

Dropped out of 3 universities on 4 separate occasions (liberal arts program, not science). Was National Merit Scholar. After dropping out for the last time, spent 10 years as a bass player, waiter, and librarian. Got my first ever straight job 40 hrs/week 9-to-5 in 1997 at age 33 to wri

Re: Syntax a little funny ....

[EMAIL PROTECTED] wrote: > I've just started trying to pick up a little perl. > I'm breezing through "Learning Perl" and reading the perl docs. Excellent book. Do more than just "breeze" through it. Study it thoroughly, it's probably the single best starting place to learn perl. > Here is some

Re: Syntax a little funny ....

That is a a great description of what is going on, but I think his question centered on the &SYNTAX*, not the *SEMANTICS*. As a programmer from the "algebraic" school (FORTRAN, algol, pascal, C, Ada, etc.), he is unacustomed to seeing a function call without surrounding parens. The key concept he

Re: Syntax a little funny ....

On Dec 8, 2003, at 10:52 AM, [EMAIL PROTECTED] wrote: I've just started trying to pick up a little perl. I'm breezing through "Learning Perl" and reading the perl docs. Here is some syntax I found a little funny, and I was hoping somebody could explain this too me: opendir(DIR, $some_dir) || die "

Syntax a little funny ....

I've just started trying to pick up a little perl. I'm breezing through "Learning Perl" and reading the perl docs. Here is some syntax I found a little funny, and I was hoping somebody could explain this too me: opendir(DIR, $some_dir) || die "can't opendir $some_dir: $!"; @dots = grep { /^\./ &&

Weekly list FAQ posting

NAME beginners-faq - FAQ for the beginners mailing list 1 - Administriva 1.1 - I'm not subscribed - how do I subscribe? Send mail to <[EMAIL PROTECTED]> You can also specify your subscription email address by sending email to (assuming [EMAIL PROTECTED] is your email address):

RE: [OT] Education Level

My junior year of high school, my school obtained an IBM 1401 computer. I was all over that thing as soon as I saw the shipping crates. I had obtained a copy of the reference manual (the so called "Principals of Operation", or "PO") before it was out of the crate. I asked if classes would be ta

Re: [OT] Education Level

Hi all, I have done my BSc in Biology , Masters in biochemistry rightnow i am doing my PhD in Bioinformatics and i extensively use Perl at my work. Most of Perl i have learnt is from this mailing list and the system manuals :) KM ---

RE: [OT] Education Level

Everything I know about Perl I learned from books, Google, and this list. -Original Message- From: J Ingersoll [mailto:[EMAIL PROTECTED] Sent: Monday, December 08, 2003 7:19 AM To: Perl Beginner's List Subject: RE: [OT] Education Level I'd like to know how many in the list - employed

RE: [OT] Education Level

> > B.A., Computer Science, -- when ? -- I recall an assignment to write > microcode for the "latest" Intel processor at that time, the 8088 (we had > a choice between that and the Motorola 68??). > > I'd like to know how many in the list - employed for their perl skills - > learned perl on th

Re: This seems to ease

It was Monday, December 08, 2003 when [EMAIL PROTECTED] took the soap box, saying: : I did the 'in' function for seeing if one element is inside on list like. : : sub in { : my $match = shift; : foreach (@_) { : return 1 if $match eq $_; : } : return 0; : } : : so I'm call

Re: This seems to ease

> On Dec 8, 2003, at 9:05 AM, Wiggins d Anconia wrote: > > > I did the 'in' function for seeing if one element is inside on list > > like. > >> > >> sub in { > >> my $match = shift; > >> foreach (@_) { > >> return 1 if $match eq $_; > >> } > >> return 0; > >> } > >> > >>

RE: Connecting to SQL 2000 Database

Neill <[EMAIL PROTECTED]> wrote: : Is their a simple how to page I can access on the web ? http://www.roth.net/perl/odbc/faq/#How%20do%20I%20use%20Win32::ODBC HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe,

RE: [OT] Education Level

B.A., Computer Science, -- when ? -- I recall an assignment to write microcode for the "latest" Intel processor at that time, the 8088 (we had a choice between that and the Motorola 68??). I'd like to know how many in the list - employed for their perl skills - learned perl on their own (pract

Re: This seems to ease

On Dec 8, Wiggins d Anconia said: >> I did the 'in' function for seeing if one element is inside on list like. > >While I realize your question is more about creating operators, etc. >Would 'grep' not work the same as the above? But his in() function short-circuits; grep() does not. grep() will

Re: This seems to ease

On Dec 8, 2003, at 9:05 AM, Wiggins d Anconia wrote: I did the 'in' function for seeing if one element is inside on list like. sub in { my $match = shift; foreach (@_) { return 1 if $match eq $_; } return 0; } so I'm calling the function like if(in($x => (1,2,3))) { ..

Connecting to SQL 2000 Database

I am a complete beginner to PERL and programming. I am struggling to wade through all the relevant documentation about database connectivity etc. I simply want to write a PERL script for a w2000 client machine to connect to a SQL2000 2000 server and read a table in a database to obtain a value

Re: This seems to ease

> I did the 'in' function for seeing if one element is inside on list like. > > sub in { > my $match = shift; > foreach (@_) { > return 1 if $match eq $_; > } > return 0; > } > > so I'm calling the function like > > if(in($x => (1,2,3))) { >... > }; > While I rea

RE: [OT] Education Level

radhika sambamurti wrote: > I chose the liberal arts route, and ended up with a degree in > economics and history. I took a similar route. B.A., History and M.B.A., Finance. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <

Re: Reading from a log - still a problem

danield wrote: > Hello all, > > I have received a solution for my problem (reading from log) from Tom > Kinzer. The code is: > > #!/usr/bin/perl -w > use strict; > my $log_file = "/appl/log/4e4d/20031130.txt"; > open LOG, "< $log_file" or die "Could not open file $!"; > while ( ) { > chomp;

Re: stripping last field of a carriage return

Tom Kinzer wrote: > Oops. 012. :( Close, but not quite: Carriage return Hex: A; Decimal: 10; Octal 012 Line feed: Hex: D; Decimal 13; Octal: 015 Joseph -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: This seems to ease

On Dec 8, [EMAIL PROTECTED] said: >I did the 'in' function for seeing if one element is inside on list like. Well, although it's overkill, Quantum::Superpositions has a 'any' function that can be used like so: if ($x == any(1, 4, 9, 16)) { ... } But Q::SP is a really big module, and won't wor

Re: Using Perl for English Grammar

On Dec 8, 2003, at 3:33 AM, Jane Langley wrote: Hi there, I am interested in using Perl to generate proper English grammatical sentences from a set "list of words" and NOT from texts. I was wondering whether there was any Perl code around that I could have a look at, use and be able to manipulate

Re: [OT] Education Level

Marcos Rebelo wrote: > > I'm scared with this opinions. I don't know what you learn in that side of > the Atlantic but from this side the University is very important. Most of > all, for learning how to think. Exactly. And that's the basis of all the best English universities which are, sadly, bei

This seems to ease

I did the 'in' function for seeing if one element is inside on list like. sub in { my $match = shift; foreach (@_) { return 1 if $match eq $_; } return 0; } so I'm calling the function like if(in($x => (1,2,3))) { ... }; this seems to be nice. After this I sink: why

Re: [OT] Education Level

> The job posting demanded a college degree. I had one > semester of college 20 years ago and normally classify > myself as "finished high school". I'm curious: What level of > education have list members attained? > Charles K. Clarkson > Head Bottle Washer, > Clarkson Energy Homes, Inc. > Mob

Using Perl for English Grammar

Hi there, I am interested in using Perl to generate proper English grammatical sentences from a set "list of words" and NOT from texts. I was wondering whether there was any Perl code around that I could have a look at, use and be able to manipulate. There is not much around. I need it for Windo

Education level

I have MSc degree (according to American levels) in math and physics, and IT or CompSci is not my trained profession. It does not prevent me from earning my money as a software developer (software engineer) in the last 5 years. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands,

RE: [OT] Education Level

I would count myself among those non-college graduates who have managed to secure "degree required" jobs (don't worry, I'm not a programmer, it just helps me with my work). I don't think it has hurt me in the way of skills or cognitive abilities, but I had to learn on my own those things that

RE: [OT] Education Level

I'm scared with this opinions. I don't know what you learn in that side of the Atlantic but from this side the University is very important. Most of all, for learning how to think. Anyone can do hacker programming but for doing software engineering you need to know a little bit more. I have worke