in reply to Help with LWP::UserAgent
#!/usr/bin/perl use LWP::Simple; $doc = get 'http://www.accountancy.smu.edu.sg/facultystaff/faculty.htm +'; open (SAVE,">test.txt") || die "Can't Open test.txt for writing: $!\n" +; binmode (SAVE); print SAVE $doc; close (SAVE);
|
|---|