#system("/sbin/mkfs -t xfs $device"); system("./make_fs.pl $device"); if (!?) { print "Failed! - $?\n"; }