Select Code to Download

sub kundNytt {
  my ($trans) = @_;
  # do something with $trans
}

$clrNr = 42;
kundNytt($clrNr);