Re: variable not being interpreted

In article <[EMAIL PROTECTED]>, Tassilo Von Parseval wrote: [...] > Still, you could also put > > mb = "~/perl/quotw/qotw13/mb" > > and expand the tilde. 'perldoc -q tilde' comes up with a regex-solution. > Using glob (which is also mentioned) is more straightforward, however: > > my $mv

Re: variable not being interpreted

On Sat, May 31, 2003 at 10:30:02AM +0200 Kevin Pfeiffer wrote: > In article <[EMAIL PROTECTED]>, Tassilo Von Parseval wrote: > > > On Sat, May 31, 2003 at 01:50:51AM +0200 Kevin Pfeiffer wrote: > > > >> I use a function to return a value: > >> "$ENV{HOME}/perl/qotw/qotw13/mb"; which is then assi

Re: variable not being interpreted

Hi Tassilo (and CKC), In article <[EMAIL PROTECTED]>, Tassilo Von Parseval wrote: > On Sat, May 31, 2003 at 01:50:51AM +0200 Kevin Pfeiffer wrote: > >> I use a function to return a value: >> "$ENV{HOME}/perl/qotw/qotw13/mb"; which is then assigned to $mb >> >> But the $ENV{HOME} part is not bei

Re: Unzip using perll

- Original Message - From: "Manish Uskaikar" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Saturday, May 31, 2003 12:34 AM Subject: Unzip using perll > Hi, > > I would like to find out, if there is any command which can do a unzip of a *.zip file; This unzip should be of the form ext

Re: Too little memory

Bob Showalter wrote: [redirected to [EMAIL PROTECTED] Camilo Gonzalez wrote: I need to read in from a temp file that is about 10 megs big in 1.5 meg increments and write results to a database. I can't slurp up the whole temp file because I'm only allowed 2 megs of memory. I was hoping to read

Re: MIME::Lite only sends 8k?

Hi Michael, > I have a report that is in HTML format, it is about 120k of text. When > is use the program fragment below to send the report, I get only the > first 8k (about) and that's it. > judging by your code, you want to attach an HTML file as attachment ( Type =>'multipart/related', ) ,

Re: variable not being interpreted

On Sat, May 31, 2003 at 01:50:51AM +0200 Kevin Pfeiffer wrote: > I use a function to return a value: > "$ENV{HOME}/perl/qotw/qotw13/mb"; which is then assigned to $mb > > But the $ENV{HOME} part is not being interpreted, so this sample: > > my $mb = get_config('mb', '.get_quiz'); > prin

Unzip using perll

Hi, I would like to find out, if there is any command which can do a unzip of a *.zip file; This unzip should be of the form extract to specific folder. Thanking you in anticipation. Regards Manish U

Re: Problem running the socket programming

I dont understand. Where or how do we create this link ( ln -s /opt/perl/bin/perl /usr/bin/perl)? "LoBue, Mark" wrote: > > -Original Message- > > From: Bob Showalter [mailto:[EMAIL PROTECTED] > > Sent: Friday, May 30, 2003 11:08 AM > > To: 'LoBue, Mark'; [EMAIL PROTECTED] > > Subject:

variable not being interpreted

I use a function to return a value: "$ENV{HOME}/perl/qotw/qotw13/mb"; which is then assigned to $mb But the $ENV{HOME} part is not being interpreted, so this sample: my $mb = get_config('mb', '.get_quiz'); print "$mb\n"; exit; produces literally: "$ENV{HOME}/perl/qotw/qotw13/mb" instead

Re: Splicing sub input into a regular expression

That did the trick. Thanks, Ken On Friday, May 30, 2003, at 07:19 PM, James Edward Gray II wrote: On Friday, May 30, 2003, at 06:10 PM, Ken Tozier wrote: sub GetPhotoInfo($inPhotoPath) This should be: sub GetPhotoInfo { open(PROPS, 'egrep -a \']+)>[^<]*\' $inPhotoPath | All sub routine par

Re: Splicing sub input into a regular expression

On Friday, May 30, 2003, at 06:10 PM, Ken Tozier wrote: sub GetPhotoInfo($inPhotoPath) This should be: sub GetPhotoInfo { open(PROPS, 'egrep -a \']+)>[^<]*\' $inPhotoPath | All sub routine parameters are passed in the @_ variable. To get the first of those $_[0], should do the trick. So re

Splicing sub input into a regular expression

I just put the finishing touches on some Perl code that reads info from Photoshop jpeg files but when trying to package it up inside a subroutine, I'm having trouble using the input variable. For example in the naked code I wrote: open(PROPS, 'egrep -a \']+)>[^<]*\' "file.jpg" | '); but when t

RE: Too little memory

Camilo Gonzalez wrote: > Bob Showalter wrote: > > > [redirected to [EMAIL PROTECTED] > > > > Camilo Gonzalez wrote: > > > > > > > I need to read in from a temp file that is about 10 megs big in > > > 1.5 meg increments and write results to a database. I can't slurp > > > up the whole temp file

MIME::Lite only sends 8k?

I have a report that is in HTML format, it is about 120k of text. When is use the program fragment below to send the report, I get only the first 8k (about) and that's it. I ran into this same problem with MFMail, but it runs fine with the mail command (sendmail). The problem is the mail command

Global configuration variables..to be used in multiple modules. How?

Hello People, I have the need to use some global variables, set once in multiple modules. Instead of declaring them at the top of each module, I would like to be able to set them up in a config file and 'use' them in each module. Any suggestions on how to do this? Thanks in advance, Hamish -- H

Re: Newbie not getting expected values from s/// operator

Hi Ken. Ken Tozier wrote: > I wrote a simple script to extract some of the info Photoshop 6 embeds > in jpeg files through the "file info" dialog box and find that I can > extract the info no problem with: > > open(PROPS, 'egrep -a \']+)>[^<]*\' > "botanical-garden12-full.jpg" | '); > > Doing prin

RE: Problem running the socket programming

> -Original Message- > From: Bob Showalter [mailto:[EMAIL PROTECTED] > Sent: Friday, May 30, 2003 11:08 AM > To: 'LoBue, Mark'; [EMAIL PROTECTED] > Subject: RE: Problem running the socket programming > > > LoBue, Mark wrote: > > ... > > On my HP-UX systems, the location of perl changed fr

RE: Problem running the socket programming

LoBue, Mark wrote: > ... > On my HP-UX systems, the location of perl changed from 10.2 to 11 > > 10.2 = /usr/local/bin/perl > > 11 = /opt/perl/bin/perl > > And, I couldn't add a link because /opt and /usr are 2 different > logical volumes, so, I had to change the first line of my scripts to > po

Installing module PAR make errors

I am getting the following error while attempting to "make" the PAR module... "cp lib/App/Packer/PAR.pm blib/lib/App/Packer/PAR.pm cp lib/PAR/Heavy.pm blib/lib/PAR/Heavy.pm cp lib/PAR.pm blib/lib/PAR.pm cp lib/PAR/Intro.pod blib/lib/PAR/Intro.pod make[1]: Entering directory `/root/PAR-0.68/myldr' g

RE: Problem running the socket programming

> -Original Message- > From: anil adenan [mailto:[EMAIL PROTECTED] > Sent: Thursday, May 29, 2003 8:43 PM > To: [EMAIL PROTECTED] > Subject: Problem running the socket programming > > > Hello, > I have a socket programming that is running smoothly in > our clients > HP UX version 10.

Re: How to print HTML immediately, and more than once?

> "Martin" == Martin Lomas <[EMAIL PROTECTED]> writes: Martin> Hello All, Martin> I'm so glad to have found this list! I've searched all over about the following with no luck: Maybe if you were even luckier, you would have found the perl-beginners-cgi list instead. Martin> I'm writing a sim

How to print HTML immediately, and more than once?

Hello All, I'm so glad to have found this list! I've searched all over about the following with no luck: I'm writing a simple file upload script. I have all the form and file handling stuff done. I want the script to write an HTML message to the user browser before the upload begins, you know,

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: Return Value Displayed to STDOUT

Bob, Okay, I found the error. Thanks for the info still... FYI, the problem was that I had two consecutive print statements, but the first one ended with a ',' (since I used to continue to a new line), instead of a ';' IE: print "This is my first line\n", print "This is my second lin

SQL row number

Hi, I would like to know if it is possible with perl, when we search for a general 'thing'( i.e search in the database all people that speaks english) in a MySQL database, what is the row number of the last row that matches the SELECT statment? If so can someone show me an example? I would apprec

RE: A Doubt on Regular Expression

seems, it matches any path with 2 sub dirs, ending with xyz and populates $1 with the second dir for instance if $cur_dir = "/cgi-bin/dev/xyz" then $1 is set to "dev" -Original Message- From: Hari Krishnaan [mailto:[EMAIL PROTECTED] Sent: Friday, May 30, 2003 9:27 AM To: [EMAIL PROTE

Re: Can someone find out what's wrong ?

Just out of curiosity what kind of cards are you using that you can change the MAC address ?? Mark - Original Message - From: "Nikolay Hristakiev" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Friday, May 30, 2003 12:36 AM Subject: Can someone find out what's wrong ? > I've got a sc

A Doubt on Regular Expression

Hi everyone, Can anyone tell me what the following piece of code does : my $cur_dir = cwd (); if ($cur_dir =~ m, ^/.*/ (.*)/xyz,) { } Thanks, hari - Do you Yahoo!? Free online calendar with sync to Outlook(TM).

RE: MIME::Lite : Can someone please point out what I'm doing wron g?

-Original Message- From: Rich Fernandez [mailto:[EMAIL PROTECTED] Sent: Thursday, May 29, 2003 3:51 PM To: '[EMAIL PROTECTED]' Subject: MIME::Lite : Can someone please point out what I'm doing wrong? my $msg = MIME::Lite -> new( From=> '[EMAIL PROTECTED]', To =

Installing Heap Module

When I install Heap module, I don't have the superuser permission and set the install location by run: %perl Makefile.PL PREFIX=/mz/hd/liuyi/local/Heap-0.50 %make %make test The above three commands run OK, but after I run '%make install', it told me: Warning: You do not have permissions to instal

Re: RFC s/user Access->M/user web based system

On Thursday 29 May 2003 4:21 pm, Jenda Krynicky wrote: > From: Bob Showalter <[EMAIL PROTECTED]> > > > Gary Stainburn wrote: > > > At the moment we have a membership database written in access on a > > > windows box. One person is responsible for keeping this up to date > > > and then distributing

DBI and Unique Keys

Hi, I have an Oracle table with a Unique Key which is generated by a trigger : CREATE TRIGGER MYTRIGGER before insert on MYTABLE for each row begin select MYSEQUENCE.nextval into :new.MYCOLUMNAME from dual; end; And this works fine on normal insert When I try to insert from a perl script I get

RE: Return Value Displayed to STDOUT

Jeff Westman wrote: > I am calling a function that returns a value, 0 or 1. The value (1) > is being captured in my variable ($goodRC), but is -ALSO- being > displayed on STDOUT! > > <---snippet-> > sub edHeader() > { >... >return 1; > } > $goodRC = editHeader

Return Value Displayed to STDOUT

I am calling a function that returns a value, 0 or 1. The value (1) is being captured in my variable ($goodRC), but is -ALSO- being displayed on STDOUT! <---snippet-> sub edHeader() { ... return 1; } $goodRC = editHeader(); print "more code, blah, blah. blah\n"

Re: cgi object not returning file content

Also I should mention that I create another cgi object for a diferent file that is out of scope and not related to this method. Does that matter?

RE: Newbie not getting expected values from s/// operator

On Friday, May 30, 2003, at 08:24 AM, Kipp, James wrote: Next I try to loop through the results and extract parts of each string like so: $tmp = ""; while () { $tmp .= s/]+)>([^<]*)/$1: $2/; } Doing a "print" on $tmp, yeilds 1 None of the lines in "PROPS" contain a single dig

cgi object not returning file content

This is really strange. I have a method that works and returns all the values in a file for the cgi object. But on the second call to the script it opens the file and returns none of the cgi parameters. the $cgi->param( ) returns POSTDATA and the keywords( ) returns nothing. I'm using strict

Re: GetOpt Help

Hi Paul, In article <[EMAIL PROTECTED]>, Paul Johnson wrote: [...] > I presume this is code that you have just made up on the spot rather than > something taken from a working project, but I couldn't say for sure what > the Classes hash was doing. Here's how I would code something similar for >

RE: I'm about to lose my Perl Virginty...

The O'Reilly series of books are very good and there are a few other books available here http://learn.perl.org/library/ O'Reilly books include: Learning Perl Learning Perl on Win32 systems Programming Perl Perl Cookbook Advanced Perl Programming And don't forget your Perl distribution comes w

RE: Too little memory

[redirected to [EMAIL PROTECTED] Camilo Gonzalez wrote: > I need to read in from a temp file that is about 10 megs big in 1.5 > meg increments and write results to a database. I can't slurp up the > whole temp file because I'm only allowed 2 megs of memory. I was > hoping to read in only 1.5 megs

I'm about to lose my Perl Virginty...

... okay, people, I've been trying to study this perl language, and it is versatile to say the least. Anyway, i have written the psuedo code, and I am about to write my first perl program. I have searched for a perl howto, but the all seem to deal with CGI programming. Can anyone direct me to a g

OT Re: [RE: windows event log]

On a different note. Does anyone know how to track events down to milliseconds in the event log? I wrote a script which pulls out HH:MM:SS.uu (WMI script) but .uu is all zeros. TIA! gc Roy Sprague <[EMAIL PROTECTED]> wrote: > - > Attac

RE: windows event log

The easiest way would be to use Microsoft's free EventComb program. http://www.microsoft.com/downloads/details.aspx?FamilyId=9964CF42-E236-4D73- AEF4-7B4FDC0A25F6 &displaylang=en Roy