Select Code to Download

sub is_in_list {
  return !!grep { $_ eq $_[0] } @_[ 1 .. $#_ ];
...
__output__

baz is in list

  use Data::Dumper;

...

  $VAR1 = '';
  $VAR1 = '1';