Hello all,
I need to use Term::ANSIColor but the following simple test:
#!perl
use Term::ANSIColor;
print color 'bold blue';
print "This text is bold blue.\n";
print color 'reset';
print "This text is normal.\n";
print colored ("Yellow on magenta.\n", 'yellow
"Bouarich, Reda" wrote:
Hi,
Is there any equivalent of the fork() on a Win32 platform?
thanks.
reda.
I didn't see any other reply so perhaps this will suffice.
Win32 does not have a fork.
Perl 5.6 simulates a fork on Win32 by using threads. Not quite the same
but it comes fairly
Hi all.
i'm trying to send a confirmation email after people submit a form in my
site.well i 'm using a Mail::Sender module that i saw somewhere on the
Internet.The problem is:I can received a message the tells me that the email
was sent with success but i'm not receiving the message i sent
?[1;34mThis text is bold blue.
?[0mThis text is normal.
?[33;45mYellow on magenta.
?[0mThis text is normal.
in the dos box. Do I need to change something in my environment variables?
This question was asked last week(?). Phillip noted that the DOS box needs
an ANSI driver in order to know
was sent with success but i'm not receiving the message i sent to me just
Does Mail::Sender have a debug=1 parameter? Net::SMTP does. Perhaps you
could look at the output from that or check the mail in the perl@ mailbox to
see that none of the messages got returned.
I am getting this error message:
(W) You used a bareword that might someday be claimed as a reserved word.
It's best to put such a word in quotes, or capitalize it somehow, or
insert
an underbar into it. You might also declare it as a subroutine.
I got this once before and it was
"Ron Grabowski" [EMAIL PROTECTED] 03/17/01 11:46AM
?[1;34mThis text is bold blue.
?[0mThis text is normal.
?[33;45mYellow on magenta.
?[0mThis text is normal.
in the dos box. Do I need to change something in my environment variables?
This question was asked last week(?).
- Original Message -
From: Greg Wardawy [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Sunday, March 18, 2001 5:42 AM
Subject: Re: Term::ANSIColor
"Ron Grabowski" [EMAIL PROTECTED] 03/17/01 11:46AM
?[1;34mThis text is bold blue.
?[0mThis text is normal.
?[33;45mYellow on magenta.
"Sisyphus" [EMAIL PROTECTED] 03/17/01 05:09PM
- Original Message -
From: Greg Wardawy [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Sunday, March 18, 2001 5:42 AM
Subject: Re: Term::ANSIColor
"Ron Grabowski" [EMAIL PROTECTED] 03/17/01 11:46AM
?[1;34mThis text is
Jim McCoy wrote:
Yes, actually I am getting a line number. But I thought I was getting 2
unrelated messages.
Here is the whole error listing:
(W) You used a bareword that might someday be claimed as a reserved
word.
It's best to put such a word in quotes, or capitalize it
- Original Message -
From: Greg Wardawy [EMAIL PROTECTED]
How are you loading ansi.sys in config.sys? It was long time since I used
win 95 and maybe I'm missing something.
Greg
___
Greg,
I opened 'config.sys' and added the following line
This code:
my $ref = {'eggs' = 'bacon'};
print $ref-{eggs}, "\n";
print $ref, "\n"; # prints $ref as a hex number
print ($ref)-{eggs}, "aa\n"; # also prints $ref as hex number (why?)
outputs:
bacon
HASH(0x176f054)
HASH(0x176f054)
on both perl 5.005_03 for UNIX, and ActivePerl 5.6.0
I've had a report from a user that Win32::FileOp is causing an error on
Windows ME which reports: "shell32.dll
error". Is this a known problem?
It's being used in Tk. Here is the code:
use Win32::FileOp;
use Tk::Win32::FileOp;
my $directory = $top-BrowseForFolder(
-rootFolder =
Bennett Haselton wrote:
This code:
my $ref = {'eggs' = 'bacon'};
print $ref-{eggs}, "\n";
print $ref, "\n"; # prints $ref as a hex number
print ($ref)-{eggs}, "aa\n"; # also prints $ref as hex number (why?)
outputs:
bacon
HASH(0x176f054)
HASH(0x176f054)
on both
"Jim McCoy" [EMAIL PROTECTED] wrote on 3/17/01:
Here is the script up to line 5:
#!/usr/bin/perl -w
use cgi qw(:standard);
use strict;
use diagnostics;
print header;
I capitalized cgi and eliminated the error messages you received.
#!/usr/bin/perl -w
use CGI qw(:standard);
use strict;
use
I think that if you have the opening parenthesis right after "print", even
if there is whitespace in between, then the parser looks for a closing
parenthesis and assumes that everything in between is the entire argument
list for "print" -- so:
print ($ref)-{eggs};
just passes "$ref" as
I guess I has a similar problem. I has a shopping cart script
(WebSite+NT4.0).
I've tried
Net::SMTP;
Socket qw(:DEFAULT :crlf);
Mail::Sender
and made all them work.
BUT.
I've noticed that with some addresses in field From:
script didn't sent mail without any errors.
Seems that SMTP server
From: "Jim McCoy" [EMAIL PROTECTED]
Subject: Re: Help identifying an error
Yes, actually I am getting a line number. But I thought I was getting 2
unrelated messages.
[snip]
Here is the script up to line 5:
#!/usr/bin/perl -w
use cgi qw(:standard);
use strict;
use diagnostics;
print
18 matches
Mail list logo