my @empty= ();
    my @list= ( 1, (), empty(), /(hi)/g, @list[@empty], 2 );
    sub empty { return }
    print "(", join(",",@list), ")\n";