[Moscow.pm] STDIN <> и чёрная магия

[Denis Evdokimov]

Приветствую.
Кто мне сможет объяснить, почему второй вариант так разительно отличается
от первого варианта?
Много чего перечитал, прежде чем отправить вопрос, но внятно объяснить так
и не смог.

#!/usr/bin/perl
use strict;
use warnings;

my $data = "aaa\nbbb\nccc\n";

# Вариант 1
close STDIN or die $!;
open( STDIN, '<', \$data ) or die $!;
@ARGV = ();
while (<STDIN>)
{
    print "[[$ARGV]]***$_";
}

# Вариант 2
close STDIN or die $!;
open( STDIN, '<', \$data ) or die $!;
@ARGV = ();
while (<>)
{
    print "[[$ARGV]]***$_";
}
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20111207/853491cd/attachment.html>