| Server IP : 185.252.147.100 / Your IP : 216.73.217.33 Web Server : nginx/1.27.3 System : Linux mitrofanov.ru 6.1.0-37-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.140-1 (2025-05-22) x86_64 User : mitr ( 1000) PHP Version : 8.2.29 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : OFF Directory : /proc/self/root/usr/share/konwert/filters/ |
Upload File : |
#!/usr/bin/perl -p s/&#([0-9]+);/ $1 < 0x80 ? $1 == ord "\"" ? """ : $1 == ord "&" ? "&" : $1 == ord "<" ? "<" : $1 == ord ">" ? ">" : chr ($1) : $1 < 0x800 ? chr (0xC0 | $1 >> 6 & 0x1F) . chr (0x80 | $1 & 0x3F) : $1 < 0x10000 ? chr (0xE0 | $1 >> 12 & 0x0F) . chr (0x80 | $1 >> 6 & 0x3F) . chr (0x80 | $1 & 0x3F) : $1 < 0x200000 ? chr (0xF0 | $1 >> 18 & 0x07) . chr (0x80 | $1 >> 12 & 0x3F) . chr (0x80 | $1 >> 6 & 0x3F) . chr (0x80 | $1 & 0x3F) : $1 < 0x4000000 ? chr (0xF8 | $1 >> 24 & 0x03) . chr (0x80 | $1 >> 18 & 0x3F) . chr (0x80 | $1 >> 12 & 0x3F) . chr (0x80 | $1 >> 6 & 0x3F) . chr (0x80 | $1 & 0x3F) : $1 < 0x80000000 ? chr (0xFC | $1 >> 30 & 0x01) . chr (0x80 | $1 >> 24 & 0x3F) . chr (0x80 | $1 >> 18 & 0x3F) . chr (0x80 | $1 >> 12 & 0x3F) . chr (0x80 | $1 >> 6 & 0x3F) . chr (0x80 | $1 & 0x3F) : $&/eg;