Language Basics Perl

#!/usr/local/bin/perl 
$" = "::"; 
@array = ("This", "is", "a", "list"); 
print ("@array\n");