$line or next; # explicitly ignore empty input
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';
$line or next; # explicitly ignore empty input
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';