/[suikacvs]/www/test/html/script/charset/src2bin.pl

Contents of /www/test/html/script/charset/src2bin.pl

Parent Directory | Revision Log

Revision 1.1 - (show annotations) (download)
Sat Feb 17 11:28:34 2007 UTC (18 years, 4 months ago) by wakaba
Branch: MAIN
CVS Tags: HEAD
File MIME type: text/plain

First version of test suite

1	#!/usr/bin/perl
2	use strict;
3
4	while (<>) {
5	s/\\x([0-9A-Fa-f][0-9A-Fa-f])/pack 'C', hex $1/ge;
6	print;
7	}

admin@suikawiki.org	ViewVC Help
Powered by ViewVC 1.1.24