$xxx = 1234;
BEGIN {
    warn $xxx;
}