my $zaehl = 0xFFC10000;

sub adr {
    if ($zaehl == 0xFFC10000) {
       printf "%08X\n", $zaehl;
    }
    $zaehl += hex("00000010");
   printf "%08X\n", $zaehl;
    
}