#!/usr/bin/perl -P
#include "aa"
print $aa;

##</code><code>##

$::aa = "Hi aa\n";