use strict;
$aaa++;
print $aaa;