-my $kageaddr="kage2.fonts.jp:80"; # Specify port number!
-my $t1asm = "/usr/local/bin/t1asm"; # point to 't1asm' executable.
-die "Cannot execute $t1asm. Abort.\n" unless -x $t1asm;
-my $pfaedit="/usr/local/bin/pfaedit"; # point to 'pfaedit' executable.
-die "Cannot execute $pfaedit. Abort.\n" unless -x $pfaedit;
-my $cleanup_script="svg2t1.pfe"; # Set the name of pfaedit script.
+#my $kageaddr="home.fonts.jp:5100"; # Specify port number!
+my $kageaddr="home.fonts.jp:5101"; # Specify port number!
+#my $kagecgi="/~kamichi/test/kagecgi.cgi"; #
+
+my $t1asm = "/usr/bin/env t1asm"; # point to 't1asm' executable.
+#die "Cannot execute $t1asm. Abort.\n" unless -x $t1asm;
+my $pfaedit="/usr/bin/env pfaedit"; # point to 'pfaedit' executable.
+#die "Cannot execute $pfaedit. Abort.\n" unless -x $pfaedit;
+
+$omegadb_path=~s!/$!!;
+
+my $cleanup_script=""; # Check the path of pfaedit script, if needed.
+
+unless($cleanup_script){
+ if(-e "/usr/local/share/texmf/omega/ocp/local/chise/svg2t1.pfe"){
+ $cleanup_script="/usr/local/share/texmf/omega/ocp/local/chise/svg2t1.pfe";
+ }elsif(-e "/usr/share/texmf/omega/ocp/local/chise/svg2t1.pfe"){
+ $cleanup_script="/usr/share/texmf/omega/ocp/local/chise/svg2t1.pfe";
+ }elsif(-e "/sw/share/texmf/omega/ocp/local/chise/svg2t1.pfe"){
+ $cleanup_script="/sw/share/texmf/omega/ocp/local/chise/svg2t1.pfe";
+ }
+}
+unless($cleanup_script and -e $cleanup_script){
+ print STDERR "svg2t1.pfe not found!\n",
+ "please check \$cleanup_script in $0.\n";
+ exit 1;
+}
+
+my $dbpath="$omegadb_path/glyph.db"; # check your DB path.