Help for this page

Select Code to Download

Select or download this
```
use MIME::QuotedPrint;
```
Select or download this
```
print tomail "$line\n";
```

Select or download this

$decoded = MIME::QuotedPrint::decode($line);
print tomail "$decoded";