use strict;
use warnings;

package Chunk;

#our $scale =42;

package main;


my $myscale = $Chunk::{scale} // 1;

print $myscale;