Wi-Fi [ath9k] не работает над 14.04 LTS

Соответствующая часть обновления может быть найдена в этой части скрипта (взята из указанной вами ссылки и с «От:» и кавычками отредактирована):

case "s" { #print $from and $subj for new email
    &gmail;
    if ($new>0){
        my $size=@from;
        if ($emails!=-1 && $size>$emails){$size=$emails;} #limit number of emails displayed
        for(my $i=0; $i<$size; ++$i){
            print "$from[$i]\n"; #print from line
            $text=$subj[$i]."\n";
            print wrap($initial_tab, $subsequent_tab, $text); #print subject with word wrap
        }
        $size=@from;
        if ($emails!=-1 && $size >$emails){print "$emails out of $size new emails displayed\n";}
    }
} 

Что вы хотите здесь добавьте print для hr (горизонтальная линия конки) и отредактируйте шрифт вокруг объекта с помощью переменной font. Вот пример, обратите внимание, что я не смог его протестировать.

case "s" { #print $from and $subj for new email
    &gmail;
    if ($new>0){
        my $size=@from;
        if ($emails!=-1 && $size>$emails){$size=$emails;} #limit number of emails displayed
        for(my $i=0; $i<$size; ++$i){
            print "$from[$i]\n"; #print from line
            $text='${font sans:style=normal:size=10}'.$subj[$i].'${font}'."\n";
            print wrap($initial_tab, $subsequent_tab, $text); #print subject with word wrap
            print '${hr}' . "\n";
        }
        $size=@from;
        if ($emails!=-1 && $size >$emails){print "$emails out of $size new emails displayed\n";}
    }
}   

${font} в конце объекта должен, насколько мне известно, возвращать предметы окружающему шрифту. Если нет, вам может понадобиться снова установить свой более смелый шрифт после последнего закрытия.