my $aLex=25; print(display($aLex),"\n");