use Readonly;

Readonly my $PI => 3.141592654;

print "$PI\n";