Uninitialized value in pattern match

The last line of this code foreach $PkgFile( @$PkgList ) { if( $PkgFile =~m/^\s*$/) gives this warning message Use of uninitialized value in pattern match (m//) at packagefile.pm line 838. How can I solve this? (I have no idea what the code does...) -- To unsubscribe, e-mail: [EMAIL P

Re: Re: Array of Array refs @ 1180470274

Intrah onat Diria .. , ** wrote "Revera y": > > > Changing @ to $ is confusing... this is different in perl6 , the following could be unreadable @ 1180470350 ::: hbeingspiel , 0::- , 1::',| , 0::| , 1::ver

Re: string manip. @ 1171669455

Intrah onat Diria .. Fri, 16 Feb 2007 15:08:02 -0800 , "Nishi Bhonsle" wrote "Revera y": > Thanks. > > How can i achieve that? my $s = 'instance/bit/bitGroup/default/tz/l_cs'; $s =~ /.*\/(.*)$/; print $1; > $mylang = l_cs, in the above example. > I have to get the last directory and

Re: Re: All of "perldoc" to text @ 1162502881

Intrah onat Diria .. Thu, 2 Nov 2006 22:07:49 +0100 , Tommy Nordgren wrote "Revera y": > Content-Type: application/octet-stream; > > > > , the following is an abbreviation of the contents: >

File::Find when found

hello i am using File::Find to recursively search for a specific file but once i found that file , how can i stop File::Find from searching any further ? i don't 'find' any help in the dox , it becomes a strange world when finding is not enough anymore thanks jmcs3 ---

Re: Re: Network bandwidth throttling...? @ 1149979267

Intrah onat Diria .. 10 Jun 2006 10:56:06 -0700 , ** wrote "Revera y": > Hard to find a topic I haven't written on yet. :) what about " the dependency of god on the interpolation of matter in the universe " ? the following could be unreadable @ 1149979648 :::

[OT]Re: Re: defaults @ 1149875970

Intrah onat Diria .. 09 Jun 2006 08:10:11 -0700 , Randal L. Schwartz wrote "Revera y": > x-mayan-date: Long count = 12.19.13.6.13; tzolkin = 9 Ben; haab = 6 Zotz .. the following could be unreadable @ 1149876152 ::: _ , / , > , 982 , "tome" , > , i

Re: Re: [OT] I give up with the reply-to business already @ 1146598876

Intrah onat Diria .. 02 May 2006 12:30:05 -0700 , ** wrote "Noalim y": > That's another objection I had in reading the replies to this thread: the > *list* never sends a message. *People* send messages. So the "From" and > "reply-to" should never be an mechanical list resending mecha

Re: splitting on every other delimiter @ 1146493312

Intrah onat Diria .. Mon, 01 May 2006 09:06:21 -0500 , Rance Hall wrote "Revera y": > > For additional commands, e-mail: [EMAIL PROTECTED] > To unsubscribe, e-mail: [EMAIL PROTECTED] > -- > > > > [EMAIL PROTECTED] > 1-308

deleting an element from an array

hello i want to delete an element from an anonymous array in a hash with: delete ${$alltheworlds{ $d }}[$num]; now instead of being being deleted it turns out be 'undef' and my @array = ( undef, "one", "two" ); print scalar @array gives :3 so the element is only "half" deleted where is the

Re: to open a gnome file browser @ 1145703670

BAD MSG: X-of---andand---openL--ilanguage---a-onopened-bomb__--ilanguage-silanguages-constitute-can-of--is-a--until- f--ofa: not Message-ID: <[EMAIL PROTECTED]> X-Mailer: the entrance to the intrah @ 1145703956 .. X-Johan-Meskens-CS3s-Computer~: 14 hours and 45 m

to open a gnome file browser

hello how can i open a gnome file browser through perl ? par example , on macosx it goes something like this: system( "open $directory" ); # if i remember well thank you jmcs3 the following could be unreadable @ 1145700782 ::: Scheduled , paperB , withdrawal , +--+

last installed perl modules

hello i remember there is a terminal command which lists the last installed perl modules but i don't remember it well enough to actually know it please save memory ! kind regards jmcs3 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Dates are killing me..

for example: 2004-07-07. > > I need to take that date, get Monday's date and Sunday's date where 2004-07-07 > is between. > > Any suggestions? > > Thanks!! > -c -- Johan Viklund <[EMAIL PROTECTED]> signature.asc Description: Detta =?ISO-8859-1?Q?=E4r?= en digitalt signerad meddelandedel

Re: combining data from more than one file...

he print statement to: print "> . $orgID\n $sequence\n"; Hmm, you're trying to do string concatenation here but in that case it should be: print ">" . $orgID . "\n" . $sequence . "\n"; but it's much easier to just do it like: print &q

Re: combining data from more than one file...

m totally lost). Otherwise, I'll never learn. I would just like either hints / suggestions / pseudo code / even links to books or sites that discuss this particular topic. Meanwhile, I am eagerly awaiting my "PERL Cookbook" and I'll keep searching the web. So this was more lik

installing Tk on macosx 10.2.6

- installing Tk on macosx 10.2.6 with perl 5.6 hola i agree it is not a pure perl question yet but it will be one soon i downloaded Tk800.025.tar.gz from cpan % perl Makefile.pl gives me this outpouring : perl is installed in /System/Library/Perl/darwin okay PPM for perl5.006 Test Compiling conf

passing datastructure from one.pl to other.pl

hola i create a datastructure in one.pl and would like to make it travel to other.pl so i can process the datastructure there how do i go about it ? a direction to point me to ? pipe ? module ? i would like to keep the 2 files seperate thanks for your help jmcs3 -- To unsubscribe, e-mai

Re: ping

ameserver, not the host being available. Unfortunately I cant supply a working method... :( Kind regards Johan. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Summarising tables

t1, output) = read file1 }; if (read2 || readboth ) { if not eof file2 (time2, input2, output2) = read file1 } readboth, read1, read2 = false } Regards Johan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: RegExp Help.

links... http://www.linux-mag.com/2001-08/perl_01.html Cheers Johan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: 'vacation'

habit of putting the addresses of innocent internet citizens. This way the innocent party is getting mailbombed. I know what I'm taling about -- it happened twice with some of my accounts. -- Johan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Unsubscribing

What would be nice is to have in the subject the words [PERL] or something so my rules will sort this automatically to the perl folder. -Original Message- From: Chris Hedemark [mailto:[EMAIL PROTECTED]] Sent: 26 June 2001 13:59 To: [EMAIL PROTECTED] Subject: RE: Unsubscribing Wow... cer

Re: send variable

nakosu-budi wrote: > > i have try from john lee mail. but i got problem > the message syntax error at ./test.pl line 2, near "use > CGI." > #!/usr/bin/perl -w > use CGI.pm This row should end with a ';'. thus use CGI.pm; /Johan -- Johan Groth (xghjn)

Re: regexp trouble

Tony Cook wrote: > [snip] > > or by literally choosing the characters you want to match (preferably > using ranges): > >$tmp =~ s/^[a-z0-9]+_//i; Thank you! That did the trick. /Johan -- Johan Groth (xghjn) ! Tel. mobil: 0703 - 24 25 27 Cell Network

Re: regexp trouble

ore_text would become more_text. Does anyone know to accomplish this? /Johan -- Johan Groth (xghjn) ! Tel. mobil: 0703 - 24 25 27 Cell Network! Kontoret: 054 - 14 25 27 [EMAIL PROTECTED] ! Bofors: 0586 - 820 14 [EMAIL PROTECTED]

regexp trouble

that results in $tmp eq "ddd" instead of "bbb_ccc_ddd". /Johan -- Johan Groth (xghjn) ! Tel. mobil: 0703 - 24 25 27 Cell Network! Kontoret: 054 - 14 25 27 [EMAIL PROTECTED] ! Bofors: 0586 - 820 14 [EMAIL PROTECTED]