What have you tried? What are you havig problems with?

Please read How (Not) To Ask a Question, and follow the advice given there.

Those are three problems 1) extracting data from html and 2) parsing fixed width data 3) outputting data as csv

moritz already pointed you to the cousin of How do I post a question effectively?

There are a lot of threads on extracting data from html, its a Frequently Asked Question

There are a lot of threads on inputting or outputting CSV, its a Frequently Asked Question

See Text::CSV / Text::xSV, extract data from html with xpath, parsing fixed width data files

Now you have examples for all 3 tasks, go write some code :)

Another essay on effective question asking is http://sscce.org/ - Short, Self Contained, Correct Example

Solution code - requires Text::CSV.

use Text::CSV;
use strict;
use warnings;

my ($in, $inhandle, $out, $outhandle, $csv, @fields, $prefix);

$in = 'test.csv';
open ($inhandle, "<$in") || die;

$out = 'testout.csv';
open ($outhandle, ">$out") || die;

$csv = Text::CSV->new();

while (<$inhandle>) {
    chomp;
    $csv->parse($_);
    @fields = $csv->fields();
    if ($fields[0] =~ s/\(([A-Z])\)\-\(([A-Z])\)$//) {
        $prefix = $fields[0];
        for ($1..$2) {
            $fields[0] = "$prefix($_)";
            $csv->combine(@fields);
            print $outhandle $csv->string() . "\n";
        }
    }
    else {
        print $outhandle "$_\n";
    }
}
[download]

An appropriate web site is PerlMonks, right along with the question, the sample code, broken output and expected output.

True laziness is hard work