Skip to content

Commit

Permalink
*** empty log message ***
Browse files Browse the repository at this point in the history
  • Loading branch information
denizyuret committed Nov 27, 2006
1 parent 42a1002 commit 2c0b4cf
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions instances.pl
Original file line number Diff line number Diff line change
Expand Up @@ -25,11 +25,13 @@
$tr_buf .= lc($_);
}
}
process($tr_buf) if $tr_buf;

sub process {
$tr_buf = (' ' x $window) . '. ' . $tr_buf . '.' . (' ' x $window);
my $en_buf = $tr_buf;
$en_buf =~ tr/çðýöþü/cgiosu/;
# print $en_buf . "\n"; return;
my $lc_buf = $tr_buf;
$lc_buf =~ tr/çðýöþü/CGIOSU/;
# print "$tr_buf\n$en_buf\n";
Expand Down

0 comments on commit 2c0b4cf

Please sign in to comment.