#!/usr/bin/perl print "Content-type:text/html\n\n"; print "Umount"; system("sudo", "umount", "/dev/sda1"); print "";