ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v8.2.30

Path:root/home/qooetu/costes.qooetu.com/

Name	Size	Perm	Actions
📁 .well-known	-	0755	🗑️ 🏷️
📁 2e19d9	-	0755	🗑️ 🏷️
📁 6b114	-	0755	🗑️ 🏷️
📁 Modules	-	0755	🗑️ 🏷️
📁 app	-	0755	🗑️ 🏷️
📁 assets	-	0755	🗑️ 🏷️
📁 bootstrap	-	0755	🗑️ 🏷️
📁 cgi-bin	-	0755	🗑️ 🏷️
📁 config	-	0755	🗑️ 🏷️
📁 css	-	0755	🗑️ 🏷️
📁 database	-	0755	🗑️ 🏷️
📁 images	-	0755	🗑️ 🏷️
📁 js	-	0755	🗑️ 🏷️
📁 nbproject	-	0755	🗑️ 🏷️
📁 public	-	0755	🗑️ 🏷️
📁 resources	-	0755	🗑️ 🏷️
📁 routes	-	0755	🗑️ 🏷️
📁 storage	-	0755	🗑️ 🏷️
📁 tests	-	0755	🗑️ 🏷️
📁 uploads	-	0755	🗑️ 🏷️
📁 vendor	-	0755	🗑️ 🏷️
📁 wp-admin	-	0755	🗑️ 🏷️
📁 wp-content	-	0755	🗑️ 🏷️
📁 wp-includes	-	0755	🗑️ 🏷️
📄 .htaccess	0.23 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 COOKIE.txt	0.2 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 X7ROOT.txt	0.27 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 defaults.php	1.29 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 engine.php	0 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 error_log	813.08 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 features.php	11.28 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 googlecfb82e09419fc0f6.html	0.05 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 index.php0	1.56 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 inputs.php	0.12 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 kurd.html	1.07 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 library.php	0 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 min.php	6.83 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 p.php	2.75 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 php.ini	0.04 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 product.php	1.78 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 qpmwztts.php	0.74 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 robots.txt	0.32 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 tovmbkwh.php	0.74 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 tyyffovi.php	0.74 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 veoxv.html	1.23 KB	0644	🗑️ 🏷️ ⬇️ ✏️

Edit: Persistent.pm

package Data::Serializer::Persistent;

use warnings;
use strict;
use vars qw($VERSION @ISA);
use IO::File;

use Carp;

$VERSION = '0.01';

sub _store {
	my $self = (shift);
	my $data = (shift);
	my $file_or_fh = (shift);

if (ref($file_or_fh)) {
		#it is a file handle so print straight to it
		print $file_or_fh $self->{parent}->serialize($data), "\n";
		#We didn't open the filehandle, so we shouldn't close it.
	} else {
		#it is a file, so open it
		my ($mode,$perm) = @_;
		unless (defined $mode) {
			$mode = O_CREAT|O_WRONLY;
		}
		unless (defined $perm) {
			$perm = 0600;
		}
		my $fh = new IO::File; 
		$fh->open($file_or_fh, $mode,$perm) || croak "Cannot write to $file_or_fh: $!";
		print $fh $self->{parent}->serialize($data), "\n";
		$fh->close();
	}
}

sub _retrieve {
	my $self = (shift);
	my $file_or_fh = (shift);
	if (ref($file_or_fh)) {
		#it is a file handle so read straight from it
		my $input = join('', <$file_or_fh>);
		chomp($input);
		return $self->{parent}->deserialize($input);
		#We didn't open the filehandle, so we shouldn't close it.
	} else {
		my $fh = new IO::File; 
		$fh->open($file_or_fh, O_RDONLY) ||	croak "Cannot read from $file_or_fh: $!";
		my $input = join('', <$fh>);
		chomp($input);
		$fh->close;
		return $self->{parent}->deserialize($input);
	}
}

1;
__END__

=pod

=head1 NAME
                
Data::Serializer::Persistent - Provide means of persistently storing serialized data in a file
                
=head1 SYNOPSIS

use Data::Serializer::Persistent

=head1 DESCRIPTION

Used internally to L<Data::Serializer(3)>, does not currently have any public methods
    
=head1 EXAMPLES

=over 4

=item  Please see L<Data::Serializer::Cookbook(3)>

=back

=head1 METHODS

=head1 AUTHOR

Neil Neely <F<neil@neely.cx>>.

http://neil-neely.blogspot.com/

=head1 BUGS

Please report all bugs here:

http://rt.cpan.org/Public/Dist/Display.html?Name=Data-Serializer

=head1 COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.2 or,
at your option, any later version of Perl 5 you may have available.

See http://www.perl.com/language/misc/Artistic.html

=head1 SEE ALSO

perl(1), Data::Serializer(3), IO::File(3).

=cut

📁 ＳＫＹＳＨＥＬＬ ＭＡＮＡＧＥＲ PHP v8.2.30

Edit: Persistent.pm

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v8.2.30