1#!/usr/bin/perl 2 3use lib '.'; 4use AlgParser; 5 6my $parser = new AlgParserWithImplicitExpand; 7my $ret; 8 9$ret = $parser -> parse($ARGV[0]); 10if ( ref($ret) ) { 11 $parser -> tostring(); 12 $parser -> normalize(); 13 print $parser -> tolatex(); 14} else { 15 print $parser->{htmlerror}; 16} 17 18