Getting a remote file

[audiopro]

I am trying to get a file from a remote server.

I have got this code from CPAN for the Get() command which seems to be the right thing but, it just locks up.

I have changed the domain name for security but the file name I used was pasted from the address bar so is correct.
I also tried an incorrect filename and the script refused to die.
The same problem if I remove the print statements.
Am I missing something obvious here?

#!/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use strict;
use LWP::Simple;
print "Content-type: text/html\n\n";	# prepare for HTML output
my $content = get("[URL unfurl="true"]http://www.mydomain.co.uk/dir/file.ext");[/URL]
die "Couldn't get it!" unless defined $content;
print "$content";

Keith

http://www.studiosoft.co.uk

 

[Kirsle]

How large is the file? If we're talking hundreds of megabytes in size, your script would lock up because it would run out of memory, because it tries to put the whole file contents into the variable $content

-------------
Cuvou.com | The NEW Kirsle.net

 

[audiopro]

I have tried it on a few files but none are over 30k.

Keith

http://www.studiosoft.co.uk

 

[audiopro]

Problem solved
It does not work within the same domain but works fine on a remote domain.
Thanks anyway.

Keith

http://www.studiosoft.co.uk