J
jcharth
Hello Guys I am trying to extract all email from text file using the
Email-find module and put them in an array
but i cant seem to figure it out. when i give it a text sample it works
but it just prints the emails out. How can i put them in an array? or
just put them in a string variable?
thanks.
my $finder = Email::Find->new(sub {
my($email, $orig_email) = @_;
print "Found ".$email->format."\n";
return $orig_email;
});
$finder->find(\$text);
Email-find module and put them in an array
but i cant seem to figure it out. when i give it a text sample it works
but it just prints the emails out. How can i put them in an array? or
just put them in a string variable?
thanks.
my $finder = Email::Find->new(sub {
my($email, $orig_email) = @_;
print "Found ".$email->format."\n";
return $orig_email;
});
$finder->find(\$text);