#!/usr/bin/perl

use strict;
use Lingua::Dici;
use Data::Dumper; 

my $filename = shift or die "usage: ./dict2html filename";

my $dict = Lingua::Dici::parse($filename);
print Dumper ($dict);

##dict2html($dict);