[28529] in Perl-Users-Digest
Perl-Users Digest, Issue: 9893 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Oct 26 14:05:54 2006
Date: Thu, 26 Oct 2006 11:05:05 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 26 Oct 2006 Volume: 10 Number: 9893
Today's topics:
Re: can someone unban me from freenode irc? #perl ? <bootiack@yahoo.com>
Re: can someone unban me from freenode irc? #perl ? <uri@stemsystems.com>
Re: Can't find string terminator ... <news@lawshouse.org>
Re: Check box use krakle@visto.com
Re: Check box use <notvalid@email.com>
Re: Check box use <mritty@gmail.com>
Re: Check box use <glex_no-spam@qwest-spam-no.invalid>
complex regular expression question <mark.leeds@morganstanley.com>
Re: complex regular expression question <m@remove.this.part.rtij.nl>
Re: complex regular expression question <wahab@chemie.uni-halle.de>
Re: cpu idle measurement: sar/vmstat <ced@blv-sam-01.ca.boeing.com>
PPM is missing...? <jpittman2@gmail.com>
Re: Remove short words from a string <tzz@lifelogs.com>
Re: Sorting array of hash references <tadmc@augustmail.com>
Re: Sorting array of hash references xhoster@gmail.com
Re: Sorting array of hash references anno4000@radom.zrz.tu-berlin.de
Re: stop encoding of href in anchor <tadmc@augustmail.com>
Re: stop encoding of href in anchor xhoster@gmail.com
Re: stop encoding of href in anchor <scobloke2@infotop.co.uk>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 26 Oct 2006 09:30:08 -0700
From: "gavino" <bootiack@yahoo.com>
Subject: Re: can someone unban me from freenode irc? #perl ?
Message-Id: <1161880208.324265.131340@f16g2000cwb.googlegroups.com>
Michele Dondi wrote:
> On 25 Oct 2006 19:02:28 -0700, "gavino" <bootiack@yahoo.com> wrote:
>
> >I think perl is nicer than ja-vaaa!
>
> So what?!? Are you aware that you're replying to a post by "Sisyphus"
> (whithout quoting it, for the n-th time) whose entire content I'm
> quoting hereafeter?
>
> : "John Bokma" <john@castleamber.com> wrote in message
> : news:Xns9867ABDE871D4castleamber@130.133.1.4...
> : > "gavino" <bootiack@yahoo.com> wrote:
> : >
> : > > ok this sucks lol
> : > > damn it jim!
> : > > ok
> : > > 15 naked virgins for whoever lets me back in
> : >
> : > This is a Perl group, payments should be made in camels only (either with
> : > one or two humps).
> : >
> :
> : Humping camels is illegal .... in this country, anyway ;-)
> :
> : Cheers,
> : Rob
>
> Then again: SO WHAT?!?
>
>
> Michele
> --
> {$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
> (($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
> .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
> 256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
Michele calm down, go jack off or something. I like perl much better
than ja-vaa!!!
------------------------------
Date: Thu, 26 Oct 2006 13:12:56 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: can someone unban me from freenode irc? #perl ?
Message-Id: <x7odrzuhk7.fsf@mail.sysarch.com>
>>>>> "g" == gavino <bootiack@yahoo.com> writes:
g> Michele Dondi wrote:
>> On 25 Oct 2006 19:02:28 -0700, "gavino" <bootiack@yahoo.com> wrote:
>>
>> >I think perl is nicer than ja-vaaa!
>>
>> So what?!? Are you aware that you're replying to a post by "Sisyphus"
>> (whithout quoting it, for the n-th time) whose entire content I'm
>> quoting hereafeter?
>>
>> : "John Bokma" <john@castleamber.com> wrote in message
>> : news:Xns9867ABDE871D4castleamber@130.133.1.4...
>> : > "gavino" <bootiack@yahoo.com> wrote:
>> : >
>> : > > ok this sucks lol
>> : > > damn it jim!
>> : > > ok
>> : > > 15 naked virgins for whoever lets me back in
>> : >
>> : > This is a Perl group, payments should be made in camels only (either with
>> : > one or two humps).
>> : >
>> :
>> : Humping camels is illegal .... in this country, anyway ;-)
>> :
>> : Cheers,
>> : Rob
>>
>> Then again: SO WHAT?!?
g> Michele calm down, go jack off or something. I like perl much better
g> than ja-vaa!!!
now we know why you were banned. i would ban you too if i had ops on
that network.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Thu, 26 Oct 2006 17:37:36 +0100
From: Henry Law <news@lawshouse.org>
Subject: Re: Can't find string terminator ...
Message-Id: <1161880654.55006.0@demeter.uk.clara.net>
Amer Neely wrote:
> seems more likely to be an artifact of something else. Notepad has some
> quirky behaviour as well. Try this:
> 1. Open Notepad
> 2. Type the text "this app can break" (without quotes)
> 3. Save the file
> 4. Re-open the file in Notepad
The weirdest thing I've seen.
--
Henry Law <>< Manchester, England
------------------------------
Date: 26 Oct 2006 08:22:35 -0700
From: krakle@visto.com
Subject: Re: Check box use
Message-Id: <1161876155.855612.107760@h48g2000cwc.googlegroups.com>
On Oct 26, 5:09 am, Ian Wilson <scoblo...@infotop.co.uk> wrote:
> Kuna wrote:
> > Hi All,
>
> > I need a help in a perl script.That is a nice short sentence, easy to understand. It is superfluous but
> at least it is good English (though you should capitalize Perl).
I guess Ian Wilson thinks English is the only language in the World.
News flash, not everyone speaks English but many people try to learn
our language to communicate with us. You should feel honored...
Intead of helping someone out we critisize their spelling, grammer and
punctuation. It's more so here than anywhere else. Which proves that
most programmers are anti-social geeks who don't know how to speak to
someone properly.
------------------------------
Date: Thu, 26 Oct 2006 16:05:22 GMT
From: Ala Qumsieh <notvalid@email.com>
Subject: Re: Check box use
Message-Id: <6150h.16099$TV3.5940@newssvr21.news.prodigy.com>
krakle@visto.com wrote:
> Intead of helping someone out we critisize their spelling, grammer and
> punctuation.
I agree with your statement above, but I find it funny that in a
sentence that criticizes criticizing spelling, there are three spelling
mistakes :)
--Ala
------------------------------
Date: 26 Oct 2006 09:18:12 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: Check box use
Message-Id: <1161879492.289127.244070@m7g2000cwm.googlegroups.com>
krakle@visto.com wrote:
> On Oct 26, 5:09 am, Ian Wilson <scoblo...@infotop.co.uk> wrote:
> > Kuna wrote:
> > > Hi All,
> >
> > > I need a help in a perl script.That is a nice short sentence, easy to understand. It is superfluous but
> > at least it is good English (though you should capitalize Perl).
>
> I guess Ian Wilson thinks English is the only language in the World.
> News flash, not everyone speaks English but many people try to learn
> our language to communicate with us. You should feel honored...
>
> Intead of helping someone out we critisize their spelling, grammer and
> punctuation. It's more so here than anywhere else. Which proves that
> most programmers are anti-social geeks who don't know how to speak to
> someone properly.
News Flash - if the people you're asking for help can't understand what
you're saying, they can't help you. I've been speaking English all my
life, and I can't for the life of me parse that massive paragraph-long
run-on sentence. Obviously others couldn't either. Which is why they
were trying to HELP the OP to help us help him.
If you can parse the OP's message - what the hell is stopping you from
helping him? Or do you prefer to criticize other people's criticisms
"instead of helping someone out"?
Paul Lalli
------------------------------
Date: Thu, 26 Oct 2006 11:26:17 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: Check box use
Message-Id: <4540e179$0$499$815e3792@news.qwest.net>
Kuna wrote:
> Hi All,
>
> I need a help in a perl script. So let me explain about that script :
> in the script there is a *.pl file and *.pm file where the .pl script
> is calling the .pm modules and the .pm module is containing a html form
> where there are some form fields and these form fields can be
> downloaded by the user after entering data in there and again can be
> uploaded to the form so I have done those but i need now to add
> checkboxes before the fields where I can give a condition that if the
> check box is true then after clicking download that will only download
> the checked items and again if I want to upload then also the same
> process. So I need some help to implement the checkboxes and to give
> the output as my requirement . So please give your suggestions.
I can't think of a way, off the top of my head, to upload many files at
once, using a simple checkbox. It should be possible using JavaScript
to iterate over the files and send each one. ( Searching the Internet
on "multiple file upload" came up with some good examples.)
Downloading a bunch of files, using a checkbox, should be pretty simple.
I think the trick would be to tar/zip them, on the server side, into
one file, and then send that as the download. ( Again, searching the
Internet on 'multiple file upload' showed some good examples. )
To simplify your development, I'd suggest creating a short CGI and HTML
that deals only with what you're trying to develop. Once you get it
working, then integrate it into your main script or module.
------------------------------
Date: 26 Oct 2006 09:18:01 -0700
From: "markpark" <mark.leeds@morganstanley.com>
Subject: complex regular expression question
Message-Id: <1161879481.445809.243520@m7g2000cwm.googlegroups.com>
I know perl is good for what i need to do but i find regular
expressions very difficult and
and this is what i think is needed.
IBM2006-09-29 09:30:03.00000N7800081.90000000N003398C
IBM2006-09-29 09:30:04.00006N70081.90000000N003412C
I have a lines in a file such as above and all i want to pull is the
fields
date and time ( 1 field )
2006-09-29 09:30:03
and the price
81.9
and write them out top a file with a comma in between the two fields.
i don't even want the letters IBM in the output.
an additional complication is is that there are cases where the price
could be in the hundreds in
which case, it has to be taken out to 3 digits before the decimal
rather than just 2.
another additional complication is that the stock could be MSFT in
which
case therew are 4 characters first instead of 3.
so , essentially, the price is always the four numbers before the
second dot in the file
but the 2 digits after the second dot are part of the price also.
if that helps ?
this problem seems like a mess to me.
i have read about regular expressions and i've tried and i think i
might be able
to figure the above out after a couple of weeks. but, right now i
don['t have a couple of weeks to spare. i promise that, if someone is
kind enough to give the answer,
i will grind through it no matter how long it takes me to make sure i
understand every piece.
thanks a lot.
------------------------------
Date: Thu, 26 Oct 2006 18:34:46 +0200
From: Martijn Lievaart <m@remove.this.part.rtij.nl>
Subject: Re: complex regular expression question
Message-Id: <pan.2006.10.26.16.34.45.163481@remove.this.part.rtij.nl>
On Thu, 26 Oct 2006 09:18:01 -0700, markpark wrote:
> I know perl is good for what i need to do but i find regular
> expressions very difficult and
> and this is what i think is needed.
>
> IBM2006-09-29 09:30:03.00000N7800081.90000000N003398C
> IBM2006-09-29 09:30:04.00006N70081.90000000N003412C
>
> I have a lines in a file such as above and all i want to pull is the
> fields
>
> date and time ( 1 field )
>
> 2006-09-29 09:30:03
>
> and the price
>
> 81.9
>
> and write them out top a file with a comma in between the two fields.
>
> i don't even want the letters IBM in the output.
>
> an additional complication is is that there are cases where the price
> could be in the hundreds in
> which case, it has to be taken out to 3 digits before the decimal
> rather than just 2.
>
> another additional complication is that the stock could be MSFT in
> which
> case therew are 4 characters first instead of 3.
>
> so , essentially, the price is always the four numbers before the
> second dot in the file
> but the 2 digits after the second dot are part of the price also.
Easy.
if (/(\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2})\..*(\d{4}\.\d)/) {
$date = $1;
$price = $2;
....
}
M4
--
Redundancy is a great way to introduce more single points of failure.
------------------------------
Date: Thu, 26 Oct 2006 19:18:45 +0200
From: Mirco Wahab <wahab@chemie.uni-halle.de>
Subject: Re: complex regular expression question
Message-Id: <ehqqtc$nm0$3@mlucom4.urz.uni-halle.de>
Thus spoke markpark (on 2006-10-26 18:18):
> IBM2006-09-29 09:30:03.00000N7800081.90000000N003398C
> IBM2006-09-29 09:30:04.00006N70081.90000000N003412C
>
> I have a lines in a file such as above and all i want to pull is the
> fields
> date and time ( 1 field )
> 2006-09-29 09:30:03
> and the price
> 81.9
> and write them out top a file with a comma in between the two fields.
Aren't these 'three' fields? ;-)
> i have read about regular expressions and i've tried and i think i
> might be able
> to figure the above out after a couple of weeks. but, right now i
> don['t have a couple of weeks to spare. i promise that, if someone is
> kind enough to give the answer,
> i will grind through it no matter how long it takes me to make sure i
> understand every piece.
Try on this one (I tried to get it
somehow understandable, you promised
above to work through it ;-)
use strict;
use warnings;
open (my $fh, '<', 'getrich.txt') or die "as poor man $!";
while( <$fh> ) {
if( (my @fields = split /\./) > 2 ) {
my ($d,$t) = $fields[0] =~ /\D+([-\d]+)\s+(.+?)$/;
my $buck = ($fields[1] =~ /(\d{4})$/)[0] + 0;
my ($cent) = $fields[2] =~ /^(\d{2})/;
print "$d at $t \$$buck\.$cent \n";
}
}
close $fh;
Regards
Mirco
------------------------------
Date: Thu, 26 Oct 2006 14:47:38 GMT
From: Charles DeRykus <ced@blv-sam-01.ca.boeing.com>
Subject: Re: cpu idle measurement: sar/vmstat
Message-Id: <J7qzrD.3Hx@news.boeing.com>
inetquestion wrote:
> I can't seem to get rid of the error message if sar doesn't exist in
> the path. The redirection of stderr from within the backticks isn't
> working via perl. Is there another way to allieviate these errors from
> showing up in the console? Any suggestions on how to get cpuidle which
> will work on unix or windows?
>
> $CpuAvg=`sar -u 15 2>/dev/null | tail -1 | awk '{print \$5}'`;
> if ( $CpuAvg=~/[0-9]*/ ) {
> $CpuAvg=`vmstat 15 2 | tail -1 | awk '{print \$22}'`;
> }
> chomp($CpuAvg);
>
On Unix, STDERR can be redirected but you'd have to pry out any shell
errors because the output would be interleaved. You could also exec
2>/dev/null but I can't imagine that being helpful.
$CpuAvg = `exec 2>&1; sar -u 15 | tail -1 | awk '{print \$22}'`;
IPC::Open3 is another Unix possibility although I don't know how
well it works on other OS's such as Win32:
use IPC::Open3;
# make errors available from /path/to/errfile
open(my $e, ">","/path/to/errfile") or die $!;
$p = open3($w, $r, ">&" . fileno($e), "sar -u 15...." );
...
hth,
--
Charles DeRykus
------------------------------
Date: 26 Oct 2006 06:44:48 -0700
From: "livefreeordie" <jpittman2@gmail.com>
Subject: PPM is missing...?
Message-Id: <1161870288.369575.77570@b28g2000cwb.googlegroups.com>
Hi,
I installed ActivePerl from the source distribution at
http://activestate.com/store/download.aspx?prdGUID=81fbce82-6bd5-49bc-a915-08d58c2648ca.
My platform is SunOS 5.10.
Installation went fine, but it did not install "ppm". I realize I can
add packages using
perl -MCPAN -eshell
But I loved the simplicity of PPM.
Any ideas on why it didn't get installed or how I can get it?
livefreeordie
------------------------------
Date: Thu, 26 Oct 2006 15:47:00 +0100
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: Remove short words from a string
Message-Id: <g69hcxri17f.fsf@lifelogs.com>
On 26 Oct 2006, anno4000@radom.zrz.tu-berlin.de wrote:
> Ted Zlatanov <tzz@lifelogs.com> wrote in comp.lang.perl.misc:
>> On 25 Oct 2006, yankeeinexile@gmail.com wrote:
>>
>>> "Leif Wessman" <leifwessman@hotmail.com> writes:
>>>
>>>> Hi all!
>>>>
>>>> How can I remove all words that have a length that is 3 or less?
>
> [...]
>
>>> Here is your hint.
>>> grep { length > 3 } @words;
>>
>> That's not a good hint.
>
> What's wrong with it?
As I explained in my other post, the split/grep/join approach is not
aware of punctuation and whitespace. Two spaces may become one, a
period may count as a letter... It's just not a good solution unless
we know for sure it's OK to use it.
Also the hint doesn't say anything about split() and join(). It's not
very useful. At least say "split() before, join() after" in a
comment. Takes 4 words, and may save the OP hours of work. If I
didn't know Perl well and got this hint, I'd be puzzled for many
reasons.
Finally, the OP's requirements (as I mentioned in my other post too)
contradict each other. He's removing words of length <= 3, but the
example he gives also eliminates whitespace.
Ted
------------------------------
Date: Thu, 26 Oct 2006 07:25:46 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Sorting array of hash references
Message-Id: <slrnek1aaa.jlt.tadmc@tadmc30.august.net>
alwaysonnet <kalyanrajsista@gmail.com> wrote:
> I've got an array of hash-references as following.
If you say so, but those are some mighty cumbersome keys...
> ( i've represented
> hash-references as a table below)
Why have you done that rather than representing them in real Perl
code that an answerer could use to test any potential answers?
If you make the answerer do that extra work, they are likely to move on
to helping some other poster who has taken the time to make it
easier for them to give an accurate answer.
Have you seen the Posting Guidelines that are posted here frequently?
[ snip the table ]
> I want to display all the active accounts (status with "Y") before
> inactive accounts along with preserving the order by type ie., Prefund
^^^^^^^^^^^^^^^^^^^^
> should come first before Receipt and Payment along the order.
Recent perls have a "stable" sort, so you should get that by default.
> if ($label->{'batype'} eq "Payment") {
^^^^^^
That is not the key that you said in the table. Which is it?
Precision is important in programming...
> Is there any way of how to achieve this by sorting according to status
> by preserving the account type order.
Yes, and it is a plain old everyday sort that you should have been
able to get simply by reading the docs about sorting...
----------------------------
#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
my @records = (
{ 'Type' => 'Prefund', 'A/C No' => 12345, 'Status(active/inactive)' => 'Y' },
{ 'Type' => 'Prefund', 'A/C No' => 45678, 'Status(active/inactive)' => 'N' },
{ 'Type' => 'Receipt', 'A/C No' => 78878, 'Status(active/inactive)' => 'N' },
{ 'Type' => 'Receipt', 'A/C No' => 32365, 'Status(active/inactive)' => 'Y' },
{ 'Type' => 'Payment', 'A/C No' => 56546, 'Status(active/inactive)' => 'N' },
{ 'Type' => 'Payment', 'A/C No' => 23456, 'Status(active/inactive)' => 'N' },
{ 'Type' => 'Payment', 'A/C No' => 34093, 'Status(active/inactive)' => 'Y' },
);
my @sorted = sort { $b->{'Status(active/inactive)'} cmp
$a->{'Status(active/inactive)'}
} @records;
print Dumper \@sorted;
----------------------------
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 26 Oct 2006 13:45:42 GMT
From: xhoster@gmail.com
Subject: Re: Sorting array of hash references
Message-Id: <20061026094629.347$KT@newsreader.com>
anno4000@radom.zrz.tu-berlin.de wrote:
> alwaysonnet <kalyanrajsista@gmail.com> wrote in comp.lang.perl.misc:
> > hi ,
> >
> > "batype" refers to column "Type" , "baactive" refers to column
> > "Status(active/inactive)"?
> >
> > anno, You're correct that the code will show only 3 records of
> > "Payment" type as I have put a condition like "if ($label->{'batype'}
> > eq "Payment") ".
> >
> > I need to preserve the actual order of "Type" but for each "Type" i
> > need to sort with their active accounts.
>
> [Tofu snipped. Don't do that]
>
> So just sort by "baactive", your records are already sorted by "batype".
> As I said in my previous reply, Perl's sort is stable unless you have
> an old version of Perl.
But that isn't necessarily what he wants. Maybe He wants them sorted
first by type, then by status. Not first by status, but then by type,
which is what stable sort would give him.
my %type_order = qw/Prefund 1 Receipt 2 Payment 3/;
@sorted = sort { $type_order{$a->{'type'}} <=> $type_order{$b->{'type'}}
||
$b->{'baactive'} cmp $a->{'baactive'}
} @acct_pay;
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 26 Oct 2006 14:09:06 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Sorting array of hash references
Message-Id: <4qbts2Flu066U1@news.dfncis.de>
<xhoster@gmail.com> wrote in comp.lang.perl.misc:
> anno4000@radom.zrz.tu-berlin.de wrote:
> > alwaysonnet <kalyanrajsista@gmail.com> wrote in comp.lang.perl.misc:
> > > hi ,
> > >
> > > "batype" refers to column "Type" , "baactive" refers to column
> > > "Status(active/inactive)"?
> > >
> > > anno, You're correct that the code will show only 3 records of
> > > "Payment" type as I have put a condition like "if ($label->{'batype'}
> > > eq "Payment") ".
> > >
> > > I need to preserve the actual order of "Type" but for each "Type" i
> > > need to sort with their active accounts.
> >
> > [Tofu snipped. Don't do that]
> >
> > So just sort by "baactive", your records are already sorted by "batype".
> > As I said in my previous reply, Perl's sort is stable unless you have
> > an old version of Perl.
>
> But that isn't necessarily what he wants. Maybe He wants them sorted
> first by type, then by status. Not first by status, but then by type,
> which is what stable sort would give him.
I thought of that, but
I want to display all the active accounts (status with "Y") before
inactive accounts...
doesn't leave much doubt that "status" is the primary key.
[nicely formatted two-key sort snipped]
Since the primary key is only two-valued, sort() could be replaced
with two grep()s (untested):
@sorted = (
grep( $_->{ baactive} eq 'Y', @acct_pay),
grep( $_->{ baactive} eq 'N', @acct_pay),
);
Anno
------------------------------
Date: Thu, 26 Oct 2006 08:05:21 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: stop encoding of href in anchor
Message-Id: <slrnek1ckh.jlt.tadmc@tadmc30.august.net>
meyerto@gmail.com <meyerto@gmail.com> wrote:
>> Yes, it's pretty humorous that you still don't seem to understand what
>> people have been trying to explain to you.
>>
>> Did you possibly try the 'unwanted' encoding in your browser?
^^^^^^^^^^^^^^^^^^^^^^^^^^^
^^^^^^^^^^^^^^^^^^^^^^^^^^^
> Actually, I do understand what some of these people are explaining,
Actually you do NOT.
Keep trying.
> it appears that those people don't understand the issue.
It appears that those people do understand the issue (better than
you do).
There is not much point in asking for advice if you are going to
refuse to follow that advice...
> I definitely
> don't want & separating my query parameters.
You definitely DO want & separating your query parameters.
That is compliant with the relevant specifications.
> It breaks the link.
How did you come to that conclusion?
By inspection of the HTML, or by *trying the 'unwanted' encoding
in your browser*?
You sure are spending a lot of time fixing a problem that is
not a problem at all...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 26 Oct 2006 13:40:39 GMT
From: xhoster@gmail.com
Subject: Re: stop encoding of href in anchor
Message-Id: <20061026094125.600$dT@newsreader.com>
meyerto@gmail.com wrote:
> > Yes, it's pretty humorous that you still don't seem to understand what
> > people have been trying to explain to you.
> >
> > Did you possibly try the 'unwanted' encoding in your browser?
> >
> > --
> > Gunnar Hjalmarsson
> > Email: http://www.gunnar.cc/cgi-bin/contact.pl
>
> Actually, I do understand what some of these people are explaining, and
> it appears that those people don't understand the issue. I definitely
> don't want & separating my query parameters. It breaks the link.
> For example:
>
> good:
> http://www.autotrader.com/fyc/vdp.jsp?dealer_id=94476&car_id=210332809
> broken:
> http://www.autotrader.com/fyc/vdp.jsp?dealer_id=94476&car_id=21033280
> 9
The second one is broken only if you put it there not in an href. If you
put both of those into <a href...> and save them in a html file, and then
open that file in a browser, the 2nd one in fact is not broken. (The first
one also isn't broken on the browsers I've tried, but that is only because
the browsers are generous and automatically fix it up for you.)
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Thu, 26 Oct 2006 16:30:52 +0100
From: Ian Wilson <scobloke2@infotop.co.uk>
Subject: Re: stop encoding of href in anchor
Message-Id: <yIOdnXiTmOowSd3YnZ2dnUVZ8tWdnZ2d@bt.com>
Martijn Lievaart wrote:
> On Thu, 26 Oct 2006 00:15:25 -0700, meyerto wrote:
>
>> Actually, I do understand what some of these people are explaining,
>> and it appears that those people don't understand the issue. I
>> definitely don't want & separating my query parameters. It
>> breaks the link. For example:
>>
>> good:
>> http://www.autotrader.com/fyc/vdp.jsp?dealer_id=94476&car_id=210332809
>> broken:
>> http://www.autotrader.com/fyc/vdp.jsp?dealer_id=94476&car_id=210332809
>>
I'm using Mozilla Thunderbird to read this newsgroup. I hovered my mouse
over the "broken" link. The correct URL appeared in the status bar (i.e.
the URL you label as "good").
I then clicked the "broken" URL and Thunderbird launched my web-browser
and successfully opened the Auto Trader web page for a 2003 Audi S8
Quattro Sedan. This suggests that the car_id was transmitted and
interpreted correctly.
>
>
> Did you actually try it? I did. http://ma.rtij.nl/amptest.html.
>
I tried your web page in both IE and FireFox, the "broken" link works fine.
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 9893
***************************************
