my $name=substr($_,0,20);
  my $pfad1=substr($_,24,103);
  my $pfad2=substr($_129,126);