123456789
#! /usr/bin/perl -wuse strict;my @arraytest = ("1111");my $variable = "test";print "@array$variable";