Array Perl

#!/usr/bin/perl
use warnings;
use strict;
my $test = 30;
print
   "strings",
   "numbers (",
   3.6,
   ") and variables: ",
   $test,
   "\n"
;