DB<87> print "jo" if ( @a[1,2,3,44]=(),exists $a[1])
jo
  DB<88> print "jo" if ( @a[1,2,3,44]=(1)x4, $a[1])
jo