foreach my $reg ( @{$reg_hash{IRQEN}} ) {
    $reg->print;
}