convert cda to mp3
Sponsored Links
Sponsored Links
Secleted [ 0 ] software to compare
Results 1 - 15 of about 1976
Convert::Bencode 1.03
Convert::Bencode are functions for converting to/from bencoded strings. more>>
Convert::Bencode are functions for converting to/from bencoded strings.
SYNOPSIS
use Convert::Bencode qw(bencode bdecode);
my $string = "d4:ainti12345e3:key5:value4:type4:teste";
my $hashref = bdecode($string);
foreach my $key (keys(%{$hashref})) {
print "Key: $key, Value: ${$hashref}{$key}n";
}
my $encoded_string = bencode($hashref);
print $encoded_string."n";
This module provides two functions, bencode and bdecode, which encode and decode bencoded strings respectivly.
<<lessSYNOPSIS
use Convert::Bencode qw(bencode bdecode);
my $string = "d4:ainti12345e3:key5:value4:type4:teste";
my $hashref = bdecode($string);
foreach my $key (keys(%{$hashref})) {
print "Key: $key, Value: ${$hashref}{$key}n";
}
my $encoded_string = bencode($hashref);
print $encoded_string."n";
This module provides two functions, bencode and bdecode, which encode and decode bencoded strings respectivly.
Download (0.010MB)
Added: 2006-08-02 License: Perl Artistic License Price:
1181 downloads
Convert::CharMap 0.01
Convert::CharMap is a Perl module that can conversion between Unicode Character Maps. more>>
Convert::CharMap is a Perl module that can conversion between Unicode Character Maps.
SYNOPSIS
use Convert::CharMap;
my $map = Convert::CharMap->load(CharMapML => test.xml);
$map->save(UCM => test.ucm);
This module transforms between unicode character map formats, using an in-memory representation of CharMapML as the intermediate format.
Currently is supports the CharMapML, YAML and UCM (write-only) backends; ENC, Iconv and other maps are also planned.
<<lessSYNOPSIS
use Convert::CharMap;
my $map = Convert::CharMap->load(CharMapML => test.xml);
$map->save(UCM => test.ucm);
This module transforms between unicode character map formats, using an in-memory representation of CharMapML as the intermediate format.
Currently is supports the CharMapML, YAML and UCM (write-only) backends; ENC, Iconv and other maps are also planned.
Download (0.004MB)
Added: 2006-08-18 License: Perl Artistic License Price:
1164 downloads
Convert::Cyr
Convert::Cyr, chcp is a Perl module for change cyrillic code page of a text. more>>
Convert::Cyr, chcp is a Perl module for change cyrillic code page of a text.
SYNOPSIS
use Convert::Cyr qw(chcp); $converted_string=chcp($string, $maxlen, $from, $to);
ABSTRACT
Convert::Cyr, chcp - change cyrillic code page of a text.
chcp takes as the first argument a string that is to be converted. It returns the converted string. Second argument is the lenght of the string. Third is source codepage. Forth is target codepage.
Original description from PHP function:
convert_cyr_string (string str, string from, string to) "This function returns the given string converted from one Cyrillic character set to another. The from and to arguments are single characters that represent the source and target Cyrillic character sets."
The supported types are: k - koi8-r w - windows-1251 i - iso8859-5 a - x-cp866 d - x-cp866 m - x-mac-cyrillic
<<lessSYNOPSIS
use Convert::Cyr qw(chcp); $converted_string=chcp($string, $maxlen, $from, $to);
ABSTRACT
Convert::Cyr, chcp - change cyrillic code page of a text.
chcp takes as the first argument a string that is to be converted. It returns the converted string. Second argument is the lenght of the string. Third is source codepage. Forth is target codepage.
Original description from PHP function:
convert_cyr_string (string str, string from, string to) "This function returns the given string converted from one Cyrillic character set to another. The from and to arguments are single characters that represent the source and target Cyrillic character sets."
The supported types are: k - koi8-r w - windows-1251 i - iso8859-5 a - x-cp866 d - x-cp866 m - x-mac-cyrillic
Download (0.005MB)
Added: 2006-08-17 License: Perl Artistic License Price:
1164 downloads
Convert::EBCDIC 0.06
Convert::EBCDIC, ascii2ebcdic, ebcdic2ascii is a Perl module for string conversion between EBCDIC and ASCII. more>>
Convert::EBCDIC, ascii2ebcdic, ebcdic2ascii is a Perl module for string conversion between EBCDIC and ASCII.
SYNOPSIS
use Convert::EBCDIC;
$ascii_string = ebcdic2ascii($ebcdic_string);
$ebcdic_string = ascci2ebcdic($ascii_string);
$translator = new Convert::EBCDIC;
$translator = new Convert::EBCDIC($table);
$ascii_string = $translator->toascii($ebcdic_string);
$ebcdic_string = $translator->toebcdic($ascii_string);
$Convert::EBCDIC::ccsid819
This module can be used to import then functions ascii2ebcdic and/or ebcdic2ascii or in an Object mode.
Exported Functions:
ascii2ebcdic()
takes as the first argument a EBCDIC string that is to be converted to ASCII using default converion table.
ebcdic2ascii()
takes as the first argument a ASCII string that is to be converted to EBCDIC using default converion table.
Object methods:
new()
creates a new translator object. Will take an optional argument being a 256 character conversion table.
toascii()
takes and ASCII string and return and EBCDIC string.
toebcdic()
takes and EBCDIC string and return and ASCII string.
Translation tables:
$Convert::EBCDIC::ccsid819
Character Code Set ID 00819. This is the default on most systems.
$Convert::EBCDIC::ccsid1047
Character Code Set ID 01047. This is the default on OS390.
<<lessSYNOPSIS
use Convert::EBCDIC;
$ascii_string = ebcdic2ascii($ebcdic_string);
$ebcdic_string = ascci2ebcdic($ascii_string);
$translator = new Convert::EBCDIC;
$translator = new Convert::EBCDIC($table);
$ascii_string = $translator->toascii($ebcdic_string);
$ebcdic_string = $translator->toebcdic($ascii_string);
$Convert::EBCDIC::ccsid819
This module can be used to import then functions ascii2ebcdic and/or ebcdic2ascii or in an Object mode.
Exported Functions:
ascii2ebcdic()
takes as the first argument a EBCDIC string that is to be converted to ASCII using default converion table.
ebcdic2ascii()
takes as the first argument a ASCII string that is to be converted to EBCDIC using default converion table.
Object methods:
new()
creates a new translator object. Will take an optional argument being a 256 character conversion table.
toascii()
takes and ASCII string and return and EBCDIC string.
toebcdic()
takes and EBCDIC string and return and ASCII string.
Translation tables:
$Convert::EBCDIC::ccsid819
Character Code Set ID 00819. This is the default on most systems.
$Convert::EBCDIC::ccsid1047
Character Code Set ID 01047. This is the default on OS390.
Download (0.005MB)
Added: 2006-08-18 License: Perl Artistic License Price:
1168 downloads
Convert::Recode 1.04
Convert::Recode is a Perl module to make mapping functions between character sets. more>>
Convert::Recode is a Perl module to make mapping functions between character sets.
SYNOPSIS
use Convert::Recode qw(ebcdic_to_ascii);
while () {
print ebcdic_to_ascii($_);
}
The Convert::Recode module can provide mapping functions between character sets on demand. It depends on GNU recode to provide the raw mapping data, i.e. GNU recode must be installed first. The name of the mapping function is constructed by taking the names of the two charsets and joining them with the string "_to_". For example, if you want to convert between the "mac" and the "latin1" charsets, just import the mac_to_latin1() function.
If you prefix the function name with "strict_", any characters that cannot be mapped are removed during transformation. For instance, the strict_mac_to_latin1() function converts a string to latin1 and removes all mac characters that do not have a corresponding latin1 character.
Running the command recode -l should give you the list of available character sets.
<<lessSYNOPSIS
use Convert::Recode qw(ebcdic_to_ascii);
while () {
print ebcdic_to_ascii($_);
}
The Convert::Recode module can provide mapping functions between character sets on demand. It depends on GNU recode to provide the raw mapping data, i.e. GNU recode must be installed first. The name of the mapping function is constructed by taking the names of the two charsets and joining them with the string "_to_". For example, if you want to convert between the "mac" and the "latin1" charsets, just import the mac_to_latin1() function.
If you prefix the function name with "strict_", any characters that cannot be mapped are removed during transformation. For instance, the strict_mac_to_latin1() function converts a string to latin1 and removes all mac characters that do not have a corresponding latin1 character.
Running the command recode -l should give you the list of available character sets.
Download (0.003MB)
Added: 2006-08-12 License: Perl Artistic License Price:
1168 downloads
Convert::BulkDecoder 1.03
Convert::BulkDecoder is a Perl module to extract (binary) data from mail and news messages. more>>
Convert::BulkDecoder is a Perl module to extract (binary) data from mail and news messages.
SYNOPSIS
use Convert::BulkDecoder;
my $cvt = new Convert::BulkDecoder::;
# Collect the articles into an array ref.
my $art = [];
# Decode.
my $res = $cvt->decode($art);
die("Failed!") unless $res eq "OK";
print "Extracted ", $cvt->{size}, " bytes to file ", $cvt->{file}, "n";
Convert::BulkDecoder can be used to decode binary contents as included in email and news articles. It supports UUdecoding, ydecoding and MIME attachments. The contents may be split over multiple articles (files), but must be supplied to the decode() function in one bulk.
For yencoded contents, it is possible to verify file consistency using length and checksum tests.
<<lessSYNOPSIS
use Convert::BulkDecoder;
my $cvt = new Convert::BulkDecoder::;
# Collect the articles into an array ref.
my $art = [];
# Decode.
my $res = $cvt->decode($art);
die("Failed!") unless $res eq "OK";
print "Extracted ", $cvt->{size}, " bytes to file ", $cvt->{file}, "n";
Convert::BulkDecoder can be used to decode binary contents as included in email and news articles. It supports UUdecoding, ydecoding and MIME attachments. The contents may be split over multiple articles (files), but must be supplied to the decode() function in one bulk.
For yencoded contents, it is possible to verify file consistency using length and checksum tests.
Download (0.017MB)
Added: 2006-08-22 License: Perl Artistic License Price:
1159 downloads
Convert::RACE 0.07
Convert::RACE is a conversion between Unicode and RACE. more>>
Convert::RACE is a conversion between Unicode and RACE.
SYNOPSIS
use Convert::RACE;
$domain = to_race($utf16str);
$utf16str = from_race($domain);
This module provides functions to convert between RACE (Row-based ASCII-Compatible Encoding) and Unicode Encodings.
RACE converts strings with internationalized characters into strings of US-ASCII that are acceptable as host name parts in current DNS host naming usage.
<<lessSYNOPSIS
use Convert::RACE;
$domain = to_race($utf16str);
$utf16str = from_race($domain);
This module provides functions to convert between RACE (Row-based ASCII-Compatible Encoding) and Unicode Encodings.
RACE converts strings with internationalized characters into strings of US-ASCII that are acceptable as host name parts in current DNS host naming usage.
Download (0.004MB)
Added: 2006-08-14 License: GPL (GNU General Public License) Price:
1167 downloads
Convert::Translit 1.03
Convert::Translit, transliterate, build_substitutes is a Perl module for string conversion among numerous character sets. more>>
Convert::Translit, transliterate, build_substitutes is a Perl module for string conversion among numerous character sets.
SYNOPSIS
use Convert::Translit;
$translator = new Convert::Translit($result_chset);
$translator = new Convert::Translit($orig_chset, $result_chset);
$translator = new Convert::Translit($orig_chset, $result_chset, $verbose);
$result_st = $translator->transliterate($orig_st);
$result_st = Convert::Translit::transliterate($orig_st);
build_substitutes Convert::Translit();
Convert::Translit::build_substitutes();
This module converts strings among 8-bit character sets defined by IETF RFC 1345 (about 128 sets). The RFC document is included so you can look up character set names and aliases; its also read by the module when composing conversion maps. Failing functions or objects return undef value.
Export_OK Functions:
transliterate()
returns a string in $result_chset for an argument string in $orig_chset, transliterating by a map composed by new().
build_substitutes()
rebuilds the file "substitutes" containing character definitions and approximate substitutions used when a character in $orig_chset isnt defined in $result_chset. For example, "Latin capital A" may be substituted for "Latin capital A with ogonek". It takes a long time to rebuild this file, but you should never need to. Its only source of information is file "rfc1345".
Object methods:
new()
creates a new object for converting from $orig_chset to $result_chset, these being names (or aliases) of 8-bit character sets defined in RFC 1345. If only one argument, then $orig_chset is assumed "ascii". If three arguments, the third is verbosity flag. Verbose output lists approximate substitutions and other compromises.
transliterate()
is same as the function of that name.
build_substitutes()
is same as the function of that name.
<<lessSYNOPSIS
use Convert::Translit;
$translator = new Convert::Translit($result_chset);
$translator = new Convert::Translit($orig_chset, $result_chset);
$translator = new Convert::Translit($orig_chset, $result_chset, $verbose);
$result_st = $translator->transliterate($orig_st);
$result_st = Convert::Translit::transliterate($orig_st);
build_substitutes Convert::Translit();
Convert::Translit::build_substitutes();
This module converts strings among 8-bit character sets defined by IETF RFC 1345 (about 128 sets). The RFC document is included so you can look up character set names and aliases; its also read by the module when composing conversion maps. Failing functions or objects return undef value.
Export_OK Functions:
transliterate()
returns a string in $result_chset for an argument string in $orig_chset, transliterating by a map composed by new().
build_substitutes()
rebuilds the file "substitutes" containing character definitions and approximate substitutions used when a character in $orig_chset isnt defined in $result_chset. For example, "Latin capital A" may be substituted for "Latin capital A with ogonek". It takes a long time to rebuild this file, but you should never need to. Its only source of information is file "rfc1345".
Object methods:
new()
creates a new object for converting from $orig_chset to $result_chset, these being names (or aliases) of 8-bit character sets defined in RFC 1345. If only one argument, then $orig_chset is assumed "ascii". If three arguments, the third is verbosity flag. Verbose output lists approximate substitutions and other compromises.
transliterate()
is same as the function of that name.
build_substitutes()
is same as the function of that name.
Download (0.078MB)
Added: 2006-08-08 License: Perl Artistic License Price:
1179 downloads
Convert::ASN1 0.20
Convert::ASN1 is an ASN.1 Encode/Decode library. more>>
Convert::ASN1 is an ASN.1 Encode/Decode library.
SYNOPSYS
use Convert::ASN1;
$asn = Convert::ASN1->new;
$asn->prepare(q<
[APPLICATION 7] SEQUENCE {
int INTEGER,
str OCTET STRING
}
>);
$pdu = $asn->encode( int => 7, str => "string");
$out = $asn->decode($pdu);
print $out->{int}," ",$out->{str},"n";
use Convert::ASN1 qw(:io);
$peer = asn_recv($sock,$buffer,0);
$nbytes = asn_read($fh, $buffer);
$nbytes = asn_send($sock, $buffer, $peer);
$nbytes = asn_send($sock, $buffer);
$nbytes = asn_write($fh, $buffer);
$buffer = asn_get($fh);
$yes = asn_ready($fh)
Convert::ASN1 encodes and decodes ASN.1 data structures using BER/DER rules.
<<lessSYNOPSYS
use Convert::ASN1;
$asn = Convert::ASN1->new;
$asn->prepare(q<
[APPLICATION 7] SEQUENCE {
int INTEGER,
str OCTET STRING
}
>);
$pdu = $asn->encode( int => 7, str => "string");
$out = $asn->decode($pdu);
print $out->{int}," ",$out->{str},"n";
use Convert::ASN1 qw(:io);
$peer = asn_recv($sock,$buffer,0);
$nbytes = asn_read($fh, $buffer);
$nbytes = asn_send($sock, $buffer, $peer);
$nbytes = asn_send($sock, $buffer);
$nbytes = asn_write($fh, $buffer);
$buffer = asn_get($fh);
$yes = asn_ready($fh)
Convert::ASN1 encodes and decodes ASN.1 data structures using BER/DER rules.
Download (0.060MB)
Added: 2006-08-22 License: Perl Artistic License Price:
1178 downloads
Convert::GeekCode 0.51
Convert::GeekCode is a Perl module that can convert and generate geek code sequences. more>>
Convert::GeekCode is a Perl module that can convert and generate geek code sequences.
SYNOPSIS
use Convert::GeekCode; # exports geek_decode()
my @out = geek_decode(q(
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GB/C/CM/CS/CC/ED/H/IT/L/M/MU/P/SS/TW/AT d---x s+: a-- C++++ UB++++$
P++++$ L+ E--->+ W+++$ N++ !o K w--(++) O-- M-@ !V PS+++ PE Y+>++
PGP++ t+ 5? X+ R+++ !tv b++++ DI+++@ D++ G++++ e-(--) h* r++(+) z++*
------END GEEK CODE BLOCK------
)); # yes, thats the authors geek code
my ($key, $val);
print "[$key]n$valnn" while (($key, $val) = splice(@out, 0, 2));
Convert::GeekCode converts and generates Geek Code sequences (cf. http://geekcode.com/). It supports different langugage codes and user-customizable codesets.
Since version 0.5, this module uses YAML to represent the geek code tables, for greater readability and ease of deserialization. Please refer to http://www.yaml.org/ for more related information.
The geekgen and geekdec utilities are installed by default, and may be used to generate / decode geek code blocks, respectively
<<lessSYNOPSIS
use Convert::GeekCode; # exports geek_decode()
my @out = geek_decode(q(
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GB/C/CM/CS/CC/ED/H/IT/L/M/MU/P/SS/TW/AT d---x s+: a-- C++++ UB++++$
P++++$ L+ E--->+ W+++$ N++ !o K w--(++) O-- M-@ !V PS+++ PE Y+>++
PGP++ t+ 5? X+ R+++ !tv b++++ DI+++@ D++ G++++ e-(--) h* r++(+) z++*
------END GEEK CODE BLOCK------
)); # yes, thats the authors geek code
my ($key, $val);
print "[$key]n$valnn" while (($key, $val) = splice(@out, 0, 2));
Convert::GeekCode converts and generates Geek Code sequences (cf. http://geekcode.com/). It supports different langugage codes and user-customizable codesets.
Since version 0.5, this module uses YAML to represent the geek code tables, for greater readability and ease of deserialization. Please refer to http://www.yaml.org/ for more related information.
The geekgen and geekdec utilities are installed by default, and may be used to generate / decode geek code blocks, respectively
Download (0.025MB)
Added: 2006-08-03 License: GPL (GNU General Public License) Price:
1180 downloads
Text::Convert::ToImage
Text::Convert::ToImage is a Perl module. more>>
Text::Convert::ToImage is a Perl module.
SYNOPSIS
use Text::Convert::ToImage;
my $tti = Text::Convert::ToImage->new();
my $length = length($email);
if ($length > 150) {
$email = "Your text length of $length is too large:";
}
my $config = {
TEXT => $email ? $email : "y@hn.org",
POINTSIZE => $point_size ? $point_size : 14,
LEVEL => $level ? $level : 0,
FONT => $font,
XSKEW => $xskew,
YSKEW => $yskew,
};
$tti->calculate($config);
print "Content-type: image/pngnn";
binmode STDOUT;
$tti->Write(png:-);
This was knocked up a long time ago and someone asked me if the source was available so I decided to put it on CPAN. There is very little documentation with it.
There are also very few tests. If more than me and the person who asked for the module use it then I will write some tests for it.
At the moment I have been using it top obfuscate emails and not much else. A demo can be found at http://www.hjackson.org/cgi-bin/tools/email.pl
There are some undocumented features to this module and they are this way because I have not tested to see if they work yet.
<<lessSYNOPSIS
use Text::Convert::ToImage;
my $tti = Text::Convert::ToImage->new();
my $length = length($email);
if ($length > 150) {
$email = "Your text length of $length is too large:";
}
my $config = {
TEXT => $email ? $email : "y@hn.org",
POINTSIZE => $point_size ? $point_size : 14,
LEVEL => $level ? $level : 0,
FONT => $font,
XSKEW => $xskew,
YSKEW => $yskew,
};
$tti->calculate($config);
print "Content-type: image/pngnn";
binmode STDOUT;
$tti->Write(png:-);
This was knocked up a long time ago and someone asked me if the source was available so I decided to put it on CPAN. There is very little documentation with it.
There are also very few tests. If more than me and the person who asked for the module use it then I will write some tests for it.
At the moment I have been using it top obfuscate emails and not much else. A demo can be found at http://www.hjackson.org/cgi-bin/tools/email.pl
There are some undocumented features to this module and they are this way because I have not tested to see if they work yet.
Download (0.011MB)
Added: 2006-08-22 License: Perl Artistic License Price:
1158 downloads
Convert::yEnc::Decoder 1.02
Convert::yEnc::Decoder is a Perl module that decodes yEncoded files. more>>
Convert::yEnc::Decoder is a Perl module that decodes yEncoded files.
SYNOPSIS
use Convert::yEnc::Decoder;
$decoder = new Convert::yEnc::Decoder;
$decoder = new Convert::yEnc::Decoder $dir;
$decoder->out_dir($dir);
eval
{
$decoder->decode( $file);
$decoder->decode(*FILE);
$decoder->decode;
};
print $@ if $@;
$name = $decoder->name;
$file = $decoder->file;
$size = $decoder->size;
$ybegin = $decoder->ybegin;
$ypart = $decoder->ypart;
$yend = $decoder->yend;
ABSTRACT
yEnc decoder
Convert::yEnc::Decoder decodes a yEncoded file and writes it to disk. Methods are provided for returning information about the decoded file.
<<lessSYNOPSIS
use Convert::yEnc::Decoder;
$decoder = new Convert::yEnc::Decoder;
$decoder = new Convert::yEnc::Decoder $dir;
$decoder->out_dir($dir);
eval
{
$decoder->decode( $file);
$decoder->decode(*FILE);
$decoder->decode;
};
print $@ if $@;
$name = $decoder->name;
$file = $decoder->file;
$size = $decoder->size;
$ybegin = $decoder->ybegin;
$ypart = $decoder->ypart;
$yend = $decoder->yend;
ABSTRACT
yEnc decoder
Convert::yEnc::Decoder decodes a yEncoded file and writes it to disk. Methods are provided for returning information about the decoded file.
Download (0.056MB)
Added: 2006-08-23 License: Perl Artistic License Price:
683 downloads
Convert::BER 1.3101
Convert::BER is a Perl module for ASN.1 Basic Encoding Rules. more>>
Convert::BER is a Perl module for ASN.1 Basic Encoding Rules.
SYNOPSIS
use Convert::BER;
$ber = new Convert::BER;
$ber->encode(
INTEGER => 1,
SEQUENCE => [
BOOLEAN => 0,
STRING => "Hello",
],
REAL => 3.7,
);
$ber->decode(
INTEGER => $i,
SEQUENCE => [
BOOLEAN => $b,
STRING => $s,
],
REAL => $r,
);
Convert::BER provides an OO interface to encoding and decoding data using the ASN.1 Basic Encoding Rules (BER), a platform independent way of encoding structured binary data together with the structure.
<<lessSYNOPSIS
use Convert::BER;
$ber = new Convert::BER;
$ber->encode(
INTEGER => 1,
SEQUENCE => [
BOOLEAN => 0,
STRING => "Hello",
],
REAL => 3.7,
);
$ber->decode(
INTEGER => $i,
SEQUENCE => [
BOOLEAN => $b,
STRING => $s,
],
REAL => $r,
);
Convert::BER provides an OO interface to encoding and decoding data using the ASN.1 Basic Encoding Rules (BER), a platform independent way of encoding structured binary data together with the structure.
Download (0.025MB)
Added: 2006-08-22 License: Perl Artistic License Price:
1171 downloads
Convert::EastAsianWidth 0.03
Convert::EastAsianWidth is a Perl module that can convert between full- and half-width characters. more>>
Convert::EastAsianWidth is a Perl module that can convert between full- and half-width characters.
SYNOPSIS
# Exports to_fullwidth() and to_halfwidth() by default
use Convert::EastAsianWidth;
my $u = to_fullwidth(ABC); # Full-width variant of ABC
my $b = to_fullwidth(ABC, big5); # Ditto, but in big5 encoding
my $x = to_halfwidth($u); # Gets back ABC
my $y = to_halfwidth($b, big5); # Same as above
This module uses the regular expression properties provided by Unicode::EastAsianWidth to efficiently convert between full- and half-width characters.
The first argument is the string to be converted; the second one represents the input and encodings. If omitted, both are assumed by to Unicode strings.
In Perl versions before 5.8, Encode::compat is required for the encoding conversion function to work.
<<lessSYNOPSIS
# Exports to_fullwidth() and to_halfwidth() by default
use Convert::EastAsianWidth;
my $u = to_fullwidth(ABC); # Full-width variant of ABC
my $b = to_fullwidth(ABC, big5); # Ditto, but in big5 encoding
my $x = to_halfwidth($u); # Gets back ABC
my $y = to_halfwidth($b, big5); # Same as above
This module uses the regular expression properties provided by Unicode::EastAsianWidth to efficiently convert between full- and half-width characters.
The first argument is the string to be converted; the second one represents the input and encodings. If omitted, both are assumed by to Unicode strings.
In Perl versions before 5.8, Encode::compat is required for the encoding conversion function to work.
Download (0.014MB)
Added: 2006-08-03 License: Perl Artistic License Price:
1178 downloads
Convert::AcrossLite 0.08
Convert::AcrossLite is a Perl module to convert binary AcrossLite puzzle files to text. more>>
Convert::AcrossLite is a Perl module to convert binary AcrossLite puzzle files to text.
SYNOPSIS
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
$ac->out_file(/home/doug/puzzles/Easy.txt);
$ac->puz2text;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my $text = $ac->puz2text;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my $ac->parse_file;
my $title = $ac->get_title;
my $author = $ac->get_author;
my $copyright = $ac->get_copyright;
my @solution = $ac->get_solution;
my @diagram = $ac->get_diagram;
my $across_clues = $ac->get_across_clues;
my $down_clues = $ac->get_down_clues;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my($across_hashref, $down_hashref) = get_across_down;
my %across= %$across_hashref;
foreach my $key (sort { $a $b } keys %across) {
print "Direction: $across{$key}{direction}n";
print "Clue Number: $across{$key}{clue_number}n";
print "Row: $across{$key}{row}n";
print "Col: $across{$key}{column}n";
print "Clue: $across{$key}{clue}n";
print "Solution: $across{$key}{solution}n";
print "Length: $across{$key}{length}nn";
}
my %down= %$down_hashref;
foreach my $key (sort { $a $b } keys %down) {
print "Direction: $down{$key}{direction}n";
print "Clue Number: $down{$key}{clue_number}n";
print "Row: $down{$key}{row}n";
print "Col: $down{$key}{column}n";
print "Clue: $down{$key}{clue}n";
print "Solution: $down{$key}{solution}n";
print "Length: $down{$key}{length}nn";
}
Convert::AcrossLite is used to convert binary AcrossLite puzzle files to text.
<<lessSYNOPSIS
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
$ac->out_file(/home/doug/puzzles/Easy.txt);
$ac->puz2text;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my $text = $ac->puz2text;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my $ac->parse_file;
my $title = $ac->get_title;
my $author = $ac->get_author;
my $copyright = $ac->get_copyright;
my @solution = $ac->get_solution;
my @diagram = $ac->get_diagram;
my $across_clues = $ac->get_across_clues;
my $down_clues = $ac->get_down_clues;
or
use Convert::AcrossLite;
my $ac = Convert::AcrossLite->new();
$ac->in_file(/home/doug/puzzles/Easy.puz);
my($across_hashref, $down_hashref) = get_across_down;
my %across= %$across_hashref;
foreach my $key (sort { $a $b } keys %across) {
print "Direction: $across{$key}{direction}n";
print "Clue Number: $across{$key}{clue_number}n";
print "Row: $across{$key}{row}n";
print "Col: $across{$key}{column}n";
print "Clue: $across{$key}{clue}n";
print "Solution: $across{$key}{solution}n";
print "Length: $across{$key}{length}nn";
}
my %down= %$down_hashref;
foreach my $key (sort { $a $b } keys %down) {
print "Direction: $down{$key}{direction}n";
print "Clue Number: $down{$key}{clue_number}n";
print "Row: $down{$key}{row}n";
print "Col: $down{$key}{column}n";
print "Clue: $down{$key}{clue}n";
print "Solution: $down{$key}{solution}n";
print "Length: $down{$key}{length}nn";
}
Convert::AcrossLite is used to convert binary AcrossLite puzzle files to text.
Download (0.010MB)
Added: 2006-08-03 License: Perl Artistic License Price:
1178 downloads
Secleted [ 0 ] software to compare
Copyright Notice:
Software piracy is theft, Using crack, password, serial numbers, registration codes, key generators is illegal and prevent future software development. The above convert cda to mp3 search only lists software in full, demo and trial versions for free download. Download links are directly from our mirror sites or publisher sites, torrent files or links from rapidshare.com, yousendit.com or megaupload.com are not allowed