#!c:/perl/bin/perl.exe
while('[EMAIL PROTECTED]'){
if('Internet_Explorer_6' != 'server push'){
$question_r = 'how to push animated images in that browser?';
}
elsif {
$question_r = 'why my script didn't work?';
}
else {
undef('[EMAIL PROTECTED]');
David Vd Geer Inhuur Tbv Iplib [EMAIL PROTECTED] wrote in
message [EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
Hi All,
After a couple of emails about opening a file with a lower case FH, I have
a
question. I see everyone opening a file with an or die statement, what I
can
fully understand.
I agree with your opinion regarding HTML tags and CGI.pm but I have some
comments.
If you use HTML 4.01 and use tag atributes like font or align, if you want
to validate your HTML code to be a good HTML 4.01 document, you will get
errors telling you that these atributes are deprecated.
On Fri, Jul 05, 2002 at 10:37:10AM -0400, Shishir K. Singh wrote:
chdir (..);
chdir (\\..);
chdir ('..');
chdir ('../');
Use single quotes. so that special characters are treated as literals.
. and \ are special characters. You escaped \ but not .
.. is not a special character in
On Tue, Jul 02, 2002 at 07:07:51PM -0400, James B wrote:
Is it possible to do this with a file name that *I* specify? Call a open
command with a specfied filename that will give an error if the file
already exists but otherwise create it open it for writing?
Didn't I already answer this
Timothy Johnson wrote at Sat, 06 Jul 2002 02:58:40 +0200:
use Net::SMTP;
use strict;
my %contact_info{
name = 'John Smith',
title = 'Hard Worker',
email = '[EMAIL PROTECTED]',
pager = '1234567'
}
}
my $data = '';
$data .= To: Primary Contact;
Yes, you are right. For some reason, there must have been another error
in my code. Thanks.
Tim
-Original Message-
From: Timothy Johnson [mailto:[EMAIL PROTECTED]]
Sent: Friday, July 05, 2002 2:11 PM
To: 'T. B. Booher'; [EMAIL PROTECTED]
Subject: RE: chdir to parent directory
Hi
I'm trying to write a new script that will automatic show a pop up window
with a random username and password for my members section.
The way it needs to work is that after a user pays for membership they
will
be redirected to the the script, the script will then generate a random
username
I know that 'rename' moves files from one place to another, but how do
you copy files in perl?
I looked around and didn't see any other functions for it.
Thanks,
tim
on Sat, 06 Jul 2002 12:37:39 GMT, T. B. Booher wrote:
I know that 'rename' moves files from one place to another, but how do
you copy files in perl?
See
perldoc File::Copy
--
felix
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi, all --
I sure have missed the group while I've been gone :-) Time to get back
to learning...
I use both bash and tcsh and have some extended $PATH dirs as well as
aliases and the like, and I want to maintain ONE config file instead of
two. My first project is setting $PATH, since I also
On Friday, July 5, 2002, at 09:17 , John Almberg wrote:
What's an easy way to tell if a particular module is installed on my
server?
I'm sure I read this somewhere, but can't find it. Thanks!
-- John
[jeeves:~] drieux% perl -MFoo::Bob -e 'use Foo::Bob'
Can't locate Foo/Bob.pm in @INC
on Sat, 06 Jul 2002 14:44:52 GMT, Drieux wrote:
[jeeves:~] drieux% perl -MFoo::Bob -e 'use Foo::Bob'
Why are you trying to load Foo::Bob twice?
--
felix
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
On Sat, 6 Jul 2002 00:17:04 -0400, [EMAIL PROTECTED] (John Almberg)
wrote:
What's an easy way to tell if a particular module is installed on my server?
I'm sure I read this somewhere, but can't find it. Thanks!
I'm guessing you mean remote server , and you want it via a
browser.
On Sat, 6 Jul 2002 07:37:39 -0500, [EMAIL PROTECTED] (T. B. Booher)
wrote:
I know that 'rename' moves files from one place to another, but how do
you copy files in perl?
I looked around and didn't see any other functions for it.
#!/usr/bin/perl
use File::Copy;
copy(file1,file2);
--
To
[EMAIL PROTECTED] wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
Hi
I'm trying to write a new script that will automatic show a pop up window
with a random username and password for my members section.
...snip...
Can someone how tell me how to begin and what the format looks
Now that is a handy little script. Thanks!
I have a related question . . . where does @INC come from? I guess there is
a configuration file somewhere?
-- John
# -Original Message-
# From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of
# zentara
# Sent: Saturday, July 06, 2002
John == John Almberg [EMAIL PROTECTED] writes:
John Now that is a handy little script. Thanks! I have a related
John question . . . where does @INC come from? I guess there is a
John configuration file somewhere?
It's compiled into perl itself, I believe. You can manipulate it in
I think I'm going to have to give up on installing Embperl. Making no
progress at all. Can anyone recommend a *good* hosting service that includes
Embperl as part of their package. By good I mean fast downloads (all day)
and excellent customer service.
If so, please let me know off-list at
On Saturday, July 6, 2002, at 10:00 , John Almberg wrote:
I have a related question . . . where does @INC come from? I guess there
is
a configuration file somewhere?
-- John
more info available at perldoc perlvar
a quick deconstruction:
@: this is an array
On Saturday 06 July 2002 14:18, Felix Geerinckx wrote:
on Sat, 06 Jul 2002 12:37:39 GMT, T. B. Booher wrote:
I know that 'rename' moves files from one place to another, but how do
you copy files in perl?
See
perldoc File::Copy
Is my perl doc broken, or is there some environmental
How to change 20020706 to July 6, 2002?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
can try:
my @MyMonthDesc = qw(dummy January February March April May June July August
September October November December);
my @MyDate = ();
$_ = '20020706';
my($MyYear,$MyMonth,$MyDay) = ();
if ( ! /(\d{4})(\d{2})(\d{2})/ ) {
# not correct format
}else {
$MyYear = $1;
$MyMonth
Chris wrote:
How to change 20020706 to July 6, 2002?
One way:
my $date = '20020706';
my @months = qw(
January February March April May June July
August September October November December
);
my ( $year, $mon, $day ) = unpack 'a4a2a2', $date;
my $newdate = $months{$mon - 1
Hi all,
I am quite new to perl. I heard that there is an application, which converts
perl programs into binary executables one. Can any one tell me about those
kind of programs? I would like to have a full working freeware program.
Thanks a lot in advance and waiting eagerly for the replies.
25 matches
Mail list logo