my @empty1 = ();
my $empty1 = join ",", @empty1;
@empty1 = split ",", $empty1;

my @empty2 = ("");
my $empty2 = join ",", @empty2;
@empty2 = split ",", $empty2;

##</code><code>##

------------
:Wq
Not an editor command: Wq