[SOLVED]Returning the first X characters from a remote file

[Aron]

I already looked for something in the http package manual on how to do this, but i cant figure it out...

I only want to read the first 5 characters from a file or something.. Anyone have a clue on how to realize this?

Thanks in advance.

[caesar]

The plain simple way:

Code: Select all

package require http

set myurl "http://www.google.com/"
set token [::http::geturl $myurl]
set content [::http::data $token]
::http::cleanup $content
# and extract stuff from $content

Ps: Place the "package require http" line outside your proc.

[Aron]

well, that is basically what i am doing already.

here's the situation:

Lately, a lot of people seem to have a lot of fun by spamming virus .jpg or images.
I created a script that will use something similiar to the code above to extract the headers, and check if they are actually a JPG file.

It works fine, but it stops working with very large JPGs... any idea what might be causing this?

[stdragon]

Hmm... not sure if it will work, but there is a way to pass additional headers to the geturl command. So you can use the http range header to get only the first few bytes if you want.

Something like this:

Code: Select all

set myurl "http://blah.com/horse.jpg"
set token [::http::geturl $myurl -headers [list "Range" "bytes=0-10"]]
set content [::http::data $token]

It should work, especially if your server supports the Range header (I think most do these days, for static files).