...
use Data::Dumper;
...
print Dumper (\@idold);
print Dumper (\@idnew);