Linux server1.hosting4iran.com 4.18.0-553.123.2.el8_10.x86_64 #1 SMP Thu May 7 15:28:41 EDT 2026 x86_64
LiteSpeed
Server IP : 185.208.174.156 & Your IP : 216.73.216.84
Domains : 326 Domain
User : satitravel
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
lib64 /
perl5 /
vendor_perl /
common /
Delete
Unzip
Name
Size
Permission
Date
Action
sense.pm
492
B
-rw-r--r--
2019-10-13 14:24
sense.pod
15.6
KB
-rw-r--r--
2019-10-13 14:24
Save
Rename
package common::sense; our $VERSION = 3.74; # overload should be included sub import { local $^W; # work around perl 5.16 spewing out warnings for next statement # use warnings ${^WARNING_BITS} ^= ${^WARNING_BITS} ^ "\x0c\x3f\x33\x00\x0f\xf0\x0f\xc0\xf0\xfc\x33\x00\x00\x00\x0c\x00\x00"; # use strict, use utf8; use feature; $^H |= 0x1c820fc0; @^H{qw(feature_fc feature_state feature___SUB__ feature_evalbytes feature_say feature_unicode feature_switch)} = (1) x 7; } 1