version 1.3, 2005/06/09 02:13:07
|
version 1.4, 2006/03/13 19:22:37
|
Line 7 my $parser = new AlgParserWithImplicitEx
|
Line 7 my $parser = new AlgParserWithImplicitEx
|
my $ret; |
my $ret; |
|
|
foreach $str (@ARGV) { |
foreach $str (@ARGV) { |
$ret = $parser -> parse($str); |
print($str.$/); |
if ( ref($ret) ) { |
$ret = $parser->parse($str); |
print $parser -> tostring().$/; |
if ( ref($ret) ) { |
print $parser -> normalize().$/; |
print('1). '.$parser->tostring() .$/); |
print $parser -> tolatex().$/; |
print('2). '.$parser->tolatex() .$/); |
} else { |
print('3). '.$parser->normalize().$/); |
print $parser->{htmlerror}; |
print('4). '.$parser->tostring() .$/); |
} |
print('5). '.$parser->tolatex() .$/); |
print "\n"; |
} else { |
|
print($parser->{htmlerror}.$/); |
|
} |
|
print "\n"; |
} |
} |
|
|