Select Code to Download

last if /^__DISCARD__/;

    next if $_ =~ /--.*/;
    next if $_ =~ /^SVSA.?/;

    next if $_ =~ /--/;
    next if $_ =~ /^SVSA/;

next if $_ =~ /^--/;

next if $_ =~ /^\s*--/; # also removing lines having -- with some lead
+ing white spaces

next if $_ =~ /^\s*$/; # also removing lines with only white spaces