#!/usr/bin/perl -p # Prints text from stdin as rot13 tr/A-Za-z/N-ZA-Mn-za-m/;