Mega Code Archive

 

Categories / Perl / Language Basics

 

Using the $;(dollar and semicolon) variable

#!/usr/local/bin/perl  $; = "::";  $array{"hello","there"} = 46;  $test1 = $array{"hello","there"};  $test2 = $array{"hello::there"};  print ("$test1 $test2\n");