Re: Disable Interpolation while assigning a value to a variable

[Anonymous Monk]

I believe the OP is asking about the split(), which needs to be coded my ( $u, $d ) = split /\@/, $email;

[pryrt]

That backslash is not required.

#!perl

use strict;
use warnings;

my $email = '[e-mail]';
my ($u,$d) = split (/@/,$email);
print "$email => $u,$d\n";

outputs:

[e-mail] => peter,gmail.com

In other words, if $email properly contains the email address, the split command that the original poster showed works as they wanted it to -- without your unneeded backslash (though your backslash doesn't change the results, in this case). Hence, the earlier monks were properly digging into the actual contents of $email to try to debug the problem.