#!/usr/bin/perl -w -pi
use strict;

tr/A-Z/ /;

##</code><code>##

BEGIN { $/ = \4096 }