use strict;
use warnings;
use v5.24;

my $a  = 25;
my $ra = \*a;