X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=studly;h=21a4d02dd70a0dc7569c16bb1fa76dab2ec593ee;hb=d86db99ddecefad2ca37a797d0a243ae91a62eb4;hp=8e69d9bacc705fbe55fab446d441a0996e670241;hpb=9edc0e612e98d4c563155a8fc2d96f27f4815831;p=filters.git diff --git a/studly b/studly index 8e69d9b..21a4d02 100755 --- a/studly +++ b/studly @@ -11,4 +11,3 @@ for (my $offset = 0; defined(my $c = getc); $offset++) { # (($c + $offset) % 4) == 2 and print (ord($c) ^ 32) or print($c); (($c + $offset) % 4) != 2 and print($c) or $c =~ tr/[A-Za-z]/[a-zA-Z]/, print $c; } -