假设你的TEXT FILE is foo, PERL file is bar.pl #!/bin/sh for line in `cat foo` do echo "$"$line >> foo.pl done 在bar.pl里,加上一行 require "foo.pl"