I've completed a Firefox (2.0.0.7) NAL app with a brief Perl script in
the Distribution script section. The Perl scripts purpose is to check
for the existance of Mozilla bookmarks in another directory and copy
them to the Firefox directory. The Perl script works when run by
itself outside of the NAL app. Once copied into the NAL app (The 'Run
after Distribution' section), it's not working. I removed all of the
comments and white space on the off chance it was causing a problem.

The NAL app opens, but isn't copying the bookmarks file over as it
should. So I'm guessing it's not calling the Perl script at all. The
NAL app is installing a blank (or rather default on new install)
bookmark. I've made changes to the default firefox bookmark, so the
"new" default bookmark isn't the one that would be installed with a
new install of Firefox.

The Perl engine script location is set properly, as is the Extension
for the script file (.pl).

Any reason why this would be happening, or any more information I can
provide for troubleshooting tips? Any help would be appreciated :)








Here's a copy of the Perl Scipt if anyone's curious:

#!perl

# Authors:
#This script will determine the existance of a mozilla bookmark
#and if it exists, is larger in size than the firefox bookmark,
#will copy the mozilla bookmark to the firefox bookmark location.

#Mozilla root location

$moz_root = "H:/local/mozilla/default/profile_.slt";

#Firefox2 root location

$ff_root = "H:/local/Firefox2";

$bookmark = "bookmarks.html";

#Mozilla bookmark file name and location

$moz_book = "$moz_root/$bookmark";

#Firefox2 bookmakr file name and location

$ff_book = "$ff_root/$bookmark";

$template = "P:/Apps/WIN32/Firefox2/bookmarks.html";

#search for mozilla bookmarks on H:\local and display results


#check for the existance of FireFox bookmark, if exist, exit script.

if (-f $ff_book) {
exit(0);
}

#no existing Firefox bookmarks, so
#check if Mozilla bookmark exists, if so, copy to FireFox.


if (-f $moz_book) {

open(INPUT, "<$moz_book");
open(OUTPUT, ">$ff_book");
while(<INPUT>){
print OUTPUT $_;
}
close INPUT;
close OUTPUT;
exit(0);

}


#If neither exists, copy contents of template bookmark to Firefox

open(INPUT, "<$template");
open(OUTPUT, ">$ff_book");
while(<INPUT>){
print OUTPUT $_;
}
close INPUT;
close OUTPUT;
exit(0);




#end script


--
swillra