use strict; use warnings; package new; $new::variable = 1; $another_variable = 2; 1;