use feature qw / say /;
@a = (1, 17, 4);
say "first match succeeds" if (@a ~~ 17);
say "second match fails" unless ((1, 17, 4) ~~ 17);