version 1.1, 2005/02/24 01:21:51
|
version 1.3, 2005/06/09 02:13:07
|
Line 6 use AlgParser;
|
Line 6 use AlgParser;
|
my $parser = new AlgParserWithImplicitExpand; |
my $parser = new AlgParserWithImplicitExpand; |
my $ret; |
my $ret; |
|
|
$ret = $parser -> parse($ARGV[0]); |
foreach $str (@ARGV) { |
|
$ret = $parser -> parse($str); |
if ( ref($ret) ) { |
if ( ref($ret) ) { |
$parser -> tostring(); |
print $parser -> tostring().$/; |
$parser -> normalize(); |
print $parser -> normalize().$/; |
print $parser -> tolatex(); |
print $parser -> tolatex().$/; |
} else { |
} else { |
print $parser->{htmlerror}; |
print $parser->{htmlerror}; |
} |
} |
|
print "\n"; |
|
} |
|
|