$report; $report=~s/[0-9]//g; # filter out any numbers $report=~s/_//g; # filter out any underscores $report=~s/CRS//g; # filter out the phrase 'CRS' if caps $report=~s/crs//g; # filter out the phrase 'crs' if lower $report=~s/-//g; # filter out dashes $report=~s/html//g; # filter out the phrase 'html' $report=~s/\.//g; # filter out decimal points print $report;