&DATEISCHREIBEN(@Druckernamen, @IPAdressen);

sub DATEISCHREIBEN {
...