chomp(my $sep = <>);
say join $sep, @data;