Select Code to Download

#!/usr/bin/perl -l
use strict;
use warnings;
...
  CUR = 1
  LEN = 10
--------------------