print qx(date) or die "Cannot run date:$!\n"; system (date) == 0 or die "Cannot run date:$?\n";