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