#!/usr/local/bin/perl -w

print $>;
print $/;
print $<;
print $/;