Mike Williams wrote:
On Thu, Apr 10, 2008 at 12:41 AM, Perl CGI script enhancer <
[EMAIL PROTECTED]> wrote:
my $email = populateEmail("test");
print $email;
Well, I didn't see it at first, so I cut and pasted a snippet of your code
into a local file, ran it at the command line and got:
Und
Lou Hernsen wrote:
Hallo
Hello,
I have an array
@Treasures
and I want to match anywhere in it for
/:1:2:3:/
can I
if (@Treasures =~ /:1:2:3:/){}
or do i have to change (@Treasures to $Treasures and then
$Treasures = @Treasures ;
if ($Treasures =~ /:1:2:3:/){}
if ( grep /:1:2:3:/, @Treasures
On Thu, Apr 10, 2008 at 12:41 AM, Perl CGI script enhancer <
[EMAIL PROTECTED]> wrote:
> my $email = populateEmail("test");
> print $email;
>
> When i a using the above code it results in "No recipient address
> found in header" and when i replace ${email} with "[EMAIL PROTECTED]"
> ie
>
> To : [E
my $email = populateEmail("test");
print $email;
open(SENDMAIL, "|/usr/lib/sendmail -oi -t -i") or print "cannot open
SENDMAIL: $!";
print SENDMAIL <<"EOF";
From: <[EMAIL PROTECTED]>
To:${email}
Subject: [SUSTAINING TICKET] Case
Content-type: text/html
testing..
EOF
close(SENDMAIL)
