Re^2: uninitialized value in concatenation

Possibly relates to the opening lines of the script</>

#!/usr/bin/perl -w
use strict;
my ($email_400, $email_500, $unfriendly_error, $redirect_to);
my $main_domain=getpwuid($<);
my @sendmail_path=(qw(/usr/sbin/sendmail -i -odb), "-fdcm\@nineone.org
+");

## Uncomment the below two lines to get emailed regarding the respecti
+ve
## errors.

$email_400="dcm\@$main_domain";
$email_500="dcm\@$main_domain";
[download]

should I give the whole script - 110 lines?

Comment on Re^2: uninitialized value in concatenation Download Code

Replies are listed 'Best First'.
Re^3: uninitialized value in concatenation by ikegami (Patriarch) on Nov 16, 2010 at 20:44 UTC
should I give the whole script - 110 lines? Why? The warning has already been explained. (I was going to say your question has already been answered, but you have yet to actually ask a question.) I presume you want to know which variable isn't defined and why, but that's simple debugging. You can use defined to determine which variable isn't defined. To find out why it isn't defined, find out where the variable is getting set (if it's getting set at all) and find out when the initialiser might be undefined.	[reply]

Replies are listed 'Best First'.

Re^3: uninitialized value in concatenation
by ikegami (Patriarch) on Nov 16, 2010 at 20:44 UTC

should I give the whole script - 110 lines?

Why? The warning has already been explained. (I was going to say your question has already been answered, but you have yet to actually ask a question.)

I presume you want to know which variable isn't defined and why, but that's simple debugging. You can use defined to determine which variable isn't defined. To find out why it isn't defined, find out where the variable is getting set (if it's getting set at all) and find out when the initialiser might be undefined.

[reply]