Find alle -aliases og omskriv dem - 2

while(<>) {

if(/^(-.*):\s*(.*)/) {

    print "$1\@mmmmmpmmf.dk $2\n";

}

}