BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
-use My::Project;
-use project::tac_plus::ListItem;
+Wuse 'My::Project';
+Wuse 'project::tac_plus::ListItem';
My::Project->init_project(