source: _old/nawszelkiwypadek/tools/gue_dic/canon.pl @ f712e16

Last change on this file since f712e16 was 57728c1, checked in by Mateusz Hromada <ruanda@…>, 15 years ago

Move old files to _old dir.

  • Property mode set to 100755
File size: 105 bytes
Line 
1#!/usr/bin/perl
2
3use locale;
4use attr;
5
6while (<>) {
7    s/,(.*)$/','.attr::canonize($1)/e;
8    print;
9}
Note: See TracBrowser for help on using the repository browser.