#use strict; use warnings; $x=1; @x=(2); my $the_variable_I_want_to_check = 3; our $the_varaible_I_want_to_check = 4; $^A=5;