prompt % "pmumps -t -o file.pl file.mps"

prompt % "pmumps -c file.mps"

prompt % "pmumps -f file.mps"

$BINDIR/pmumps Interpreter

~/.pmumps User configuration

/etc/pmumps.cf Site configuration

Maintained by Steffen Mueller <smueller@cpan.org>.

Usage of this module is free, including commercial use, enterprise and legacy use. However, any modifications should be notified to the maintainer.

END_OF_SCRIPT use Config;

my $file = __FILE__; $file =~ s/\.PL$//;

$script =~ s/\~(\w+)\~/$Config{$1}/eg; if (!(open(FILE, ``>$file'')) || !(print FILE $script) || !(close(FILE))) { die ``Error while writing $file: $!\n''; } print ``Extracted $file from '',__FILE__,`` with variable substitutions.\n'';

if ( ! -f ``/etc/pmumps.cf'') {

$@ = undef; eval { require File::Copy; import File::Copy; };

die ``Can't copy configuration: $@'' if $@;

copy(``mumps.cfg'', ``/etc/pmumps.cf'');

print ``Created /etc/pmups.cf\n'';

}