perl -d or 16 8

Loading DB routines from perl5db.pl version 1.37
Editor support available.

Enter h or 'h h' for help, or 'man perldebug' for more help.

main::(or:9):   my $or;
  DB<53> n
main::(or:10):  for  my $x (@ARGV){
  DB<53> n
main::(or:11):    $or |= $x ;
  DB<53> x $or, $x
0  undef
1  16  
  DB<54> x $or|$x
0  16  
  DB<55> n
main::(or:11):    $or |= $x ;
  DB<55> x $or, $x
0  16  
1  8
  DB<56> x $or|$x
0  96  
  DB<57> x 16|8
0  24  
  DB<58> n
main::(or:14):  printf("%d\n", $or);
  DB<58> n
96
main::(or:16):  exit;