sub do_something {
    my ($arg1, $arg2) = @_;
    printf "You passed arguments '%s' and '%s'\n", $arg1, $arg2;
}