История изменений
Исправление Xellos, (текущая версия) :
Конечно много. Надо писать
my $mail = new Mail::POP3Client ($u, $pw, $р, $tm);
Именованные параметры заставляют нас бессмысленно увеличивать длину строки!
А ещё лучше писать
my $mail = new Mail::POP3Client;
$mail->set_u($u);
$mail->set_pw($pw);
$mail->set_h($h);
$mail->set_tm($tm);
if (!$mail) {say $!;}
Исправление Xellos, :
Конечно много. Надо писать
my $mail = new Mail::POP3Client ($u, $pw, $р, $tm);
Именнованные параметры заставляют нас бессмысленно увеличивать длину строки!
А ещё лучше писать
my $mail = new Mail::POP3Client;
$mail->set_u($u);
$mail->set_pw($pw);
$mail->set_h($h);
$mail->set_tm($tm);
if (!$mail) {say $!;}
Исходная версия Xellos, :
Конечно много. Надо писать
my $mail = new Mail::POP3Client (U => $u, PW => $pw, H => $р, TM => $tm).
А ещё лучше писать
my $mail = new Mail::POP3Client;
$mail->set_u($u);
$mail->set_pw($pw);
$mail->set_h($h);
$mail->set_tm($tm);
if (!$mail) {say $!;}