Select Code to Download

<!-- Start_of_revision-->
revision1
...
<!-- Start_of_revision-->
revision3
<!-- End_of_revision-->

my $file = $foo_bar_file;
    open (FILE,"<$file") || die $!;
...
    {
    print $1;
    }