Makefile: remotes: Delete obsolete remote
[sunny256-utils.git] / rmxmlcomm
blob594746a505d1f542c5f3adc62bd681cef642a551
1 #!/usr/bin/env perl
3 #=======================================================================
4 # rmxmlcomm
5 # File ID: 9b4b2a18-5d43-11df-b99c-90e6ba3022ac
6 # Fjerner XML/HTML/SGML-kommentarer.
7 # Skal vi GPL’e den? Åja, det gjør vi! ☺
8 #=======================================================================
10 use strict;
11 use warnings;
13 my $Dat = join("", <>);
14 $Dat =~ s/<!--(.*?)-->//gs;
15 print($Dat);