my($agent, $url, $referer, $save_path) = @_;
    # args:
    #   $agent     - LWP::UserAgent object
    #   $url       - URL to get
    #   $referer   - referer to grab URL with (optional)
    #   $save_path - path to save image/etc. to (optional)
    my($request, $response, $content); # for http stuff