sub s {
    my $arg = defined($_[0])?shift:die("Missing arg.");
}