The repository contains a collection of different programming snippets to different programming languages from own developments as well as other projects
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 
programming-examples/perl/String/Join variables.pl

16 lines
277 B

#!/usr/bin/perl
use warnings;
sub wrapjoin ($$$@) {
my ($join, $left, $right, @strings) = @_;
foreach (@strings) {
$_ = $left. $_. $right;
}
return join $join, @strings;
}
print wrapjoin("\n", "[","]", "One", "Two", "Three");