Not Found

The requested URL was not found on this server.

Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.

1#@!#!123s

: / usr / local / bin / csf / ConfigServer /

Filename : Slurp.pm

back

###############################################################################
# Copyright 2006-2018, Way to the Web Limited
# URL: http://www.configserver.com
# Email: sales@waytotheweb.com
###############################################################################
## no critic (RequireUseWarnings, ProhibitExplicitReturnUndef, ProhibitMixedBooleanOperators, RequireBriefOpen)
# start main
package ConfigServer::Slurp;

use strict;
use lib '/usr/local/csf/lib';
use Fcntl qw(:DEFAULT :flock);
use Carp;

use Exporter qw(import);
our $VERSION     = 1.02;
our @ISA         = qw(Exporter);
our @EXPORT_OK   = qw(slurp);

our $slurpreg = qr/(?>\x0D\x0A?|[\x0A-\x0C\x85\x{2028}\x{2029}])/;
our $cleanreg = qr/(\r)|(\n)|(^\s+)|(\s+$)/;

# end main
###############################################################################
# start slurp
sub slurp {
	my $file = shift;
	if (-e $file) {
		sysopen (my $FILE, $file, O_RDONLY) or carp "*Error* Unable to open [$file]: $!";
		flock ($FILE, LOCK_SH) or carp "*Error* Unable to lock [$file]: $!";
		my $text = do {local $/; <$FILE>};
		close ($FILE);
		return split(/$slurpreg/,$text);
	} else {
		carp "*Error* File does not exist: [$file]";
	}

	return;
}
# end slurp
###############################################################################
# start slurpreg
sub slurpreg {
	return $slurpreg;
}
# end slurpreg
###############################################################################
# start cleanreg
sub cleanreg {
	return $cleanreg;
}
# end cleanreg
###############################################################################

1;

Name	Size	Last Modified	Owner	Permissions
AbuseIP.pm	2.847 KB	February 17 2018 11:54:58	root	0644
CheckIP.pm	1.808 KB	September 02 2020 3:17:48	root	0644
CloudFlare.pm	15.153 KB	June 02 2019 2:30:05	root	0644
Config.pm	16.864 KB	January 22 2020 11:58:41	root	0644
cseUI.pm	36.032 KB	March 01 2018 10:15:13	root	0644
DisplayResellerUI.pm	10.161 KB	July 15 2019 3:43:03	root	0644
DisplayUI.pm	136.018 KB	June 17 2020 2:41:17	root	0644
GetEthDev.pm	3.618 KB	August 12 2019 10:58:18	root	0644
GetIPs.pm	2.187 KB	February 17 2018 11:54:58	root	0644
KillSSH.pm	2.431 KB	April 14 2018 4:29:45	root	0644
Logger.pm	1.834 KB	February 17 2018 11:54:58	root	0644
LookUpIP.pm	11.307 KB	January 06 2020 4:19:53	root	0644
Messenger.pm	41.292 KB	October 23 2020 4:15:47	root	0644
Ports.pm	5.687 KB	April 14 2018 4:29:25	root	0644
RBLCheck.pm	6.774 KB	May 01 2018 9:39:05	root	0644
RBLLookup.pm	2.917 KB	February 17 2018 11:54:58	root	0644
RegexMain.pm	43.758 KB	June 17 2020 2:41:17	root	0644
Sanity.pm	1.878 KB	February 17 2018 11:54:58	root	0644
Sendmail.pm	3.104 KB	August 12 2019 11:05:07	root	0644
ServerCheck.pm	77.242 KB	June 17 2020 2:41:17	root	0644
ServerStats.pm	134.431 KB	March 01 2018 10:12:20	root	0644
Service.pm	2.877 KB	October 18 2018 8:40:09	root	0644
Slurp.pm	1.561 KB	February 17 2018 11:54:58	root	0644
URLGet.pm	7.367 KB	June 17 2020 2:41:17	root	0644

2017 © D7net \| D704T team