in reply to Getting info with a small flatfile db.
#!/jpsama/bin/perl -w $tks = `mount`; $jpsama = $! if $!; print $jpsama;