On Wednesday, Nov 5, 2003, at 11:55 US/Pacific, Shaun Fryer wrote:
[..]
What I hoped to have happen is that if a particular sub returns
empty, undef, or void, I will have it trigger the following sub.
What I'm unsure of, is how to get the die_msg/ to pass
to Die_Mail().
[..]
Return_Something() || D
Hi all,
I've tried the following code:
#!/perl/bin/perl -w
use strict;
$| = 1;
print "Content-type: text/html\n\n";
my $pid=fork;
if ($pid) {
print "parent\n";
exit 0;
}
else {
⊂
}
sub sub {
sleep(100);
open(OUT, ">>f:/teddy/.txt") or die "Can't write to .txt - $!";
print OUT "test"
I'd like to setup customised exception handling, but am unsure
how to impliment it. I started by reading `perldoc -f die` and
went from there, but the explanation of what I want to do is a
bit over my head. So, I'm looking for pointers, code, favoured
modules, and/or more suggested reading material
Christian Klinger wrote:
Hello List
i'm a perl newbie
does anyone know why this scritp dont set the cookie?
-
#!/usr/bin/perl
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use Net::LDAP;
use CGI::Cookie;
use MIME::Base64;
my $cgi = new CGI;
my $uid = "cklinger";
my $pw
Hi Christian
Firstly, have you checked that the domain and the url match? Just checking
as the first step to troubleshooting.
All looks fine to me except that I am not familiar with the location in the
header as I did not find it on
http://search.cpan.org/~mrjc/cvswebedit-v2.0b1/cvs-web/lib/CGI/Coo
Hello List
i'm a perl newbie
does anyone know why this scritp dont set the cookie?
-
#!/usr/bin/perl
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use Net::LDAP;
use CGI::Cookie;
use MIME::Base64;
my $cgi = new CGI;
my $uid = "cklinger";
my $pw = "klinger";
my $ldaut
> HINT: `perdoc -f time` & `perl -f localtime`
Sorry, the above should read...
HINT: `perldoc -f time` & `perldoc -f localtime`
--
=
Shaun Fryer
=
http://sourcery.ca/
ph: 905-529-0591
=
Science is like sex: occasionally something u
> In my perl CGI script, I'm trying to extract the PID
> that corresponds to it.
> How do I do this? I'm also trying to extract the
> timestamp.
> How come it's not possible to do something like:
>
> print "";
> print `time`;
> print "";
read `perldoc perlvar`
You will find the following entry
