... 
$regel =~ s/Username/\nGebruikersnaam/sgm; </BR> 
...