Perl | join() Function
join() function in Perl combines the elements of LIST into a single string using the value of VAR to separate each element. It is effectively the opposite of split.
Note that VAR is only placed between pairs of elements in the LIST; it will not be placed either before the first element or after the last element of the string. Supply an empty string rather than undef, to join together strings without a separator.
Syntax: join(VAR, LIST)
Parameters:
- VAR : Separator to be placed between list elements.
- LIST : LIST to be converted into String.
Return: Returns the joined string
Example 1:
#!/usr/bin/perl # Joining string with a separator $string = join( "-", "Beginner", "for", "Beginner" ); print"Joined String is $string\n"; # Joining string without a separator $string = join( "", "Beginner", "for", "Beginner" ); print"Joined String is $string\n"; |
Output:
Joined String is Beginner-for-Beginner Joined String is w3wiki
Example 2:
#!/usr/bin/perl # Joining string with '~' separator $string = join( "~", "Beginner", "for", "Beginner" ); print"Joined String is $string\n"; # Joining string with '***' separator $string = join( "***", "Beginner", "for", "Beginner" ); print"Joined String is $string\n"; |
Output :
Joined String is Beginner~for~Beginner Joined String is Beginner***for***Beginner