Email-Address
view release on metacpan or search on metacpan
lib/Email/Address.pm view on Meta::CPAN
274275276277278279280281282283284285286287288289290291292293294#pod positional arguments: phrase, email, and comment, and original string.
#pod
#pod The original string should only really be set using C<parse>.
#pod
#pod =cut
sub
new {
my
(
$class
,
$phrase
,
,
$comment
,
$orig
) =
@_
;
$phrase
=~ s/\A
"(.+)"
\z/$1/
if
$phrase
;
bless
[
$phrase
,
,
$comment
,
$orig
] =>
$class
;
}
#pod =item purge_cache
#pod
#pod Email::Address->purge_cache;
#pod
#pod One way this module stays fast is with internal caches. Caches live
#pod in memory and there is the remote possibility that you will have a
#pod memory problem. On the off chance that you think you're one of those
#pod people, this class method will empty those caches.
( run in 0.385 second using v1.01-cache-2.11-cpan-c6e0e5ac2a7 )