Select Code to Download

Bareword "test" not allowed while "strict subs" in use

use strict;

my @test = (test,trial,good);
my $var = "test";
push @{$var}, "Testing";