BEGIN { # set $version based on $0 require "LayerB${version}.pm"; "LayerB${version}"->import(qw(A B C)); }