#!/usr/bin/perl -w
`shutdown -r now`