Could the for( ) loop be replaced by a while(< >) contruct?

use IO::All; # needs IO::All::LWP for this to work

my $io = io->http('http://www.perlmonks.org/');
while ( my $line = $io->getline ) {
    print $line;
}
[download]