BEGIN {
    &Internals::SvREADONLY(\'blue', 0);
    ${\'blue'} = 'turtle';
    
    &Internals::SvREADONLY(\5, 0);
    ${\5} = 5.000000000001;
	
};