std.c: Improve some comments
[sunny256-utils.git] / mime2txt
blob0c8d4d871c0ab3e2edf8d56d077993f1a2f2fe1b
1 #!/usr/bin/env perl
3 # mime2txt
4 # File ID: 848c0aa8-5d3f-11df-9938-90e6ba3022ac
5 # Konverterer tekst i MIME-format til vanlig tekst. Vet ikke hvor korrekt
6 # den er, men det ser ut til å funke greit.
8 use strict;
9 use warnings;
11 while (<>) {
12 s/=([0-9a-f]{2})/chr(hex($1))/gei;
13 s/=\n//;
14 print;