#!/usr/bin/perl package symTest; my $variable_zero = 0; $variable_one = 1; $variable_two = "blue"; $variable_three = 3; for (sort keys %symTest::) { print $_, "\n"; }