#!/bin/sh

ssh -i .ssh/irclog_rsa Ein@216.151.3.180 | perl -ne '$| = 1; /.+<.+?> !rage/ && open(FH, ">", "rage.txt") && print(FH ++$rage) && close(FH);'