• sendmail.msn

    537 538  
    54 54 }
    55 55 my $ccmail;
    56 56 if ( exists $email->{cc} && ref $email->{cc} eq 'ARRAY' ) {
    57 foreach my $cc ( @{ $email->{cc}, @to } ) {
    57 foreach my $cc ( @{ $email->{cc}} ) {
    58 58 my ($cce, $ecce) = $cc =~ /^(.*?)<(.*?)>/ ? ($1, $2) : $cc =~ /<(.*?)>/ ? ('',$1) : ('',$cc);
    59 59 $cc = $ecce;
    60 60 }