Help for this page
#!/usr/bin/env perl -l ... return @rest ? get_common($common, @rest) : $common; }
$ pm_ex_same_strings.pl 1sss.txt 2abc.txt 3xyz.txt