> Unfortunately no...this is one of the things where it is worth checking,
but
> not a guarantee by any means.
Some sites even block referrers at their firewall or proxy server.
In general, if you're doing a site for a group of users whose environment you
know, then you might be able to make use
> Does anyone now if there is a way to find keys in a hash which are similar?
There is no implied organization whatsoever in a hash. Hashes don't know
"similar". The only thing you can do to find similar keys is "each %hash"
and match each key against your favorite regex for "similar".
Another
The same assumption applies to "-e" ... :-)
- Original Message -
From: "Dirk Bremer" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, September 05, 2001 4:19 PM
Subject: Re: Testing file existence
> > > > @result_files = `dir f:\\wm_ites\\ite8\\\*\.cat \/s \/b`;
> > > > fore
> > @result_files = `dir f:\\wm_ites\\ite8\\\*\.cat \/s \/b`;
> > foreach $file (@result_files){
> > $file_vob = $file;
> > if (-e chop($file_vob) ){
Am I missing something here? He's capturing the output of "dir". So, if the
file is in the directory, doesn't that mean it exists
> I have a date field that I need to convert; It comes through as the number
> of days since 1/1/1800...
How many days are there between 1/1/1800 and 1/1/1970? Work that out once and
use it as a constant. Then, subtract that number from your COBOL date, and
multiply the result by 60*60*24, and y
You might get more help from the friendly folks over at the lwp mailing list.
The list address is [EMAIL PROTECTED] I don't remember how to subscribe, but
I'd bet you can find that on perl.org.
Rodney
- Original Message -
From: "ben goswami" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Se
> Geeze, a little harsh there aren't you, ...
No, just honest. If you'd spent a New Years Day (after being up all of New
Years Night) trying to figure out why a web page was displaying "19100",
perhaps you'd feel less charitable towards Matt. My friend whose site was
used to distribute penis en
> I installed ActivePerl on our server, and I am running
> formmail.pl from Matt's Script Archive.
RUN AWAY!!!
This is a horrible tool to use, especially if you're accessible from the
Internet. I think Matt is one of the few people to rate his own CERT
advisory (I believe there's a CERT advisor
> > From: [EMAIL PROTECTED]
> > open (IN, "a.txt") ;
> > while () {
> > chomp ($line = <>);
> > # $line contains line from a.txt
>
> No $line contains a line from a file whose name is in @ARGV or from
> STDIN. You wanted
> $line =
> !!!
No ... :-)
The "while()" reads a line into $_. S
