useについて質問です。
a.plとb.pmという二つのファイルは同じディレクトリにあります。

#--a.pl--
use b;

printString();

#--b.pm--
package b;

sub printString(){
  print "aaa";
}

sub import() {
  *{"main::printString"} = \&printString;
}

1;

この状態でa.plを実行すると
&main::printStringサブルーチンが見つからないとエラーになります。
どこか間違っていますか?