Select Code to Download

    if ( my $flag = /\@user_info_start/ ... /\@user_info_end/ ) {
        push @userinfo, $_;
...
        last LINE if $flag=~/E0/;
        push @userinfo, $_ unless $flag==1;
    }