Lars Bjørndal
and 1 contributors

NAME

App::Brl2Brl - Convert between braille character sets.

VERSION

Version 0.01

SYNOPSIS

    use App::Brl2Brl;

    my %from_table = parse_dis( "$table_path/$from_table_file" );
    my %to_table = parse_dis( "$table_path/$to_table_file" );
    while( <> ){
      my $s = Conv( \%from_table, \%to_table, $_);
      print "$s";
    }

sub new { my $class = shift; my $from_table_file = shift; my $to_table_file = shift; my $self = {}; bless( $self, $class ); %{ $self->{frm} } = parse_dis( $from_table_file ); %{ $self->{to} } = parse_dis( $to_table_file ); return $self; }

sub switch_map { my $self = shift; my $inputstr = shift; my $outputstr = Conv( $self->{frm}, $self->{to}, $inputstr ); return $outputstr; }

parse_dis

Parses a liblouis .dis table file and return a hash with the characters and dots respectively.

Conv

Converts a string, character by character, from %from_table to %to_table.

AUTHOR

Lars Bjørndal, <lars at lamasti.net>

BUGS

Please report any bugs or feature requests to bug-App-brl2brl at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=App-Brl2Brl. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc App::Brl2Brl

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

Copyright 2017 Lars Bjørndal.

LICENSE

Artistic

1 POD Error

The following errors were encountered while parsing the POD:

Around line 136:

Non-ASCII character seen before =encoding in 'Bjørndal,'. Assuming UTF-8