alias my $line = ; while ( defined( alias my $line = ) ) {}