use lib ".";
use A;

$A:x = "soso";