Select Code to Download

@revision_array=();
my $start = qr/<!-- Start_of_revision-->/;
...
    {
    push (@revision_array, $1);
    }