Re: Matching strings

; Peter Scott > Pacific Systems Design Technologies > http://www.perldebugged.com > > --- End of forwarded message --- Martin van-Eerde Dip. Comp. (Open) Senior Analyst Programmer ==

Re: Matching strings

Scott > Pacific Systems Design Technologies > http://www.perldebugged.com > > Martin van-Eerde Dip. Comp. (Open) Senior Analyst Programmer ==

Re: output in specified order

> >Finished" > >); > > > > > >the order > > > >print SFN "Date/Time Stamp,ORA-1: unique constraint violation,"; > >print SFN"Fault 2-001,Fault 2-002,Fault 2-003,Fault 2-004,Fault > >2-005,"; print SFN "Fault 2-006,Fault 2-007,Fault 2-008,Fault > >2-009,Fault 2-010,"; print SFN "Fault 2-011,Fault 2-012,Fault > >2-013,Fault 2-015,"; print SFN "Bind to Factory > >Failure,SystemException,Communication failure,"; print SFN "ORB > >problem,Get Q Error,# of clients still running,"; print SFN "# of > >PricingSessions still running,# of clients Finished Test,"; print SFN > >"smtx / syscl,user %,sys %,wt %,idl %,current load average\n"; > > > >seeing that this is a hash, there is absolutely no guarantee that the > >output will be correct when it is printed. I could sort the hash, but > >the order is still wrong. > > > >any suggestions? > > > >Regards, > >Ron > > > >P.S > >don't be to critical of the print's above, yes there are a few extra > >elements in it. Those are generated outside the hash and can be > >plopped into the output where need be. I am mainly concerned with the > >proper output of the hash in the order specified > > Aaron Craig > Programming > iSoftitler.com > > Martin van-Eerde Dip. Comp. (Open) Senior Analyst Programmer ==

Re: Sub Calls

Level} = shift; > } > > -- Brett > > http://www.chapelperilous.net/btfwk/ > -- > -- To err is human, but when the eraser wears out before the pencil, > you're overdoing it a little. > > Martin van-Eerde Dip. Comp. (Open) Senior Analyst Programmer ==

Re: $hash{$_}++

for the value. > I am having trouble understanding just what the following does, > and how to you use it: > > $hash{$_}++ > > i.e. are we increment the value or the key? > > I would appreciate any guidance here! > > Thanks, > > Dave G. > >

Sorting two parallel arrays

help! my @first = qw(high medium low apex); my @second = qw(100.00 50.50 34.25 23.99); my $idx = -1; my @result = map {$idx ++; $second[$idx].'~'.$_} @first; print "merge result:\n"; print join "\n", @result; print "\n"; print sort {split( "~"