my $roll = main::3d6; # The main:: is required because???