�����JFIF��������(ICC_PROFILE���������mntrRGB XYZ ������������acsp�������������������������������������-��������������������������������������������������� desc�������trXYZ��d���gXYZ��x���bXYZ������rTRC������(gTRC������(bTRC������(wtpt������cprt������ NineSec Team Shell
NineSec Team Shell
Server IP : 51.38.211.120  /  Your IP : 216.73.216.188
Web Server : Apache
System : Linux bob 5.15.85-1-pve #1 SMP PVE 5.15.85-1 (2023-02-01T00:00Z) x86_64
User : readytorun ( 1067)
PHP Version : 8.0.30
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare,
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF
Directory (0755) :  /etc/ldap/../etckeeper/../../usr/lib/x86_64-linux-gnu/gio/../perl-base/

[  Home  ][  C0mmand  ][  Upload File  ][  Lock Shell  ][  Logout  ]

Current File : //etc/ldap/../etckeeper/../../usr/lib/x86_64-linux-gnu/gio/../perl-base/FileHandle.pm
package FileHandle;

use 5.006;
use strict;
our($VERSION, @ISA, @EXPORT, @EXPORT_OK);

$VERSION = "2.03";

require IO::File;
@ISA = qw(IO::File);

@EXPORT = qw(_IOFBF _IOLBF _IONBF);

@EXPORT_OK = qw(
    pipe

    autoflush
    output_field_separator
    output_record_separator
    input_record_separator
    input_line_number
    format_page_number
    format_lines_per_page
    format_lines_left
    format_name
    format_top_name
    format_line_break_characters
    format_formfeed

    print
    printf
    getline
    getlines
);

#
# Everything we're willing to export, we must first import.
#
IO::Handle->import( grep { !defined(&$_) } @EXPORT, @EXPORT_OK );

#
# Some people call "FileHandle::function", so all the functions
# that were in the old FileHandle class must be imported, too.
#
{
    no strict 'refs';

    my %import = (
	'IO::Handle' =>
	    [qw(DESTROY new_from_fd fdopen close fileno getc ungetc gets
		eof flush error clearerr setbuf setvbuf _open_mode_string)],
	'IO::Seekable' =>
	    [qw(seek tell getpos setpos)],
	'IO::File' =>
	    [qw(new new_tmpfile open)]
    );
    for my $pkg (keys %import) {
	for my $func (@{$import{$pkg}}) {
	    my $c = *{"${pkg}::$func"}{CODE}
		or die "${pkg}::$func missing";
	    *$func = $c;
	}
    }
}

#
# Specialized importer for Fcntl magic.
#
sub import {
    my $pkg = shift;
    my $callpkg = caller;
    require Exporter;
    Exporter::export($pkg, $callpkg, @_);

    #
    # If the Fcntl extension is available,
    #  export its constants.
    #
    eval {
	require Fcntl;
	Exporter::export('Fcntl', $callpkg);
    };
}

################################################
# This is the only exported function we define;
# the rest come from other classes.
#

sub pipe {
    my $r = IO::Handle->new;
    my $w = IO::Handle->new;
    CORE::pipe($r, $w) or return undef;
    ($r, $w);
}

# Rebless standard file handles
bless *STDIN{IO},  "FileHandle" if ref *STDIN{IO}  eq "IO::Handle";
bless *STDOUT{IO}, "FileHandle" if ref *STDOUT{IO} eq "IO::Handle";
bless *STDERR{IO}, "FileHandle" if ref *STDERR{IO} eq "IO::Handle";

1;

__END__

NineSec Team - 2022
Name
Size
Last Modified
Owner
Permissions
Options
..
--
February 12 2024 9:08:50
root
0755
Carp
--
December 13 2023 9:42:26
root
0755
Exporter
--
December 13 2023 9:42:26
root
0755
File
--
December 13 2023 9:42:26
root
0755
Getopt
--
December 13 2023 9:42:26
root
0755
Hash
--
December 13 2023 9:42:26
root
0755
IO
--
December 13 2023 9:42:26
root
0755
IPC
--
December 13 2023 9:42:26
root
0755
List
--
December 13 2023 9:42:26
root
0755
Scalar
--
December 13 2023 9:42:26
root
0755
Text
--
December 13 2023 9:42:26
root
0755
Tie
--
December 13 2023 9:42:26
root
0755
auto
--
March 06 2020 10:15:57
root
0755
unicore
--
December 13 2023 9:42:26
root
0755
warnings
--
December 13 2023 9:42:26
root
0755
AutoLoader.pm
5.358 KB
November 23 2023 4:02:19
root
0644
Carp.pm
24.793 KB
November 23 2023 4:02:19
root
0644
Config.pm
3.202 KB
November 23 2023 4:02:19
root
0644
Config_git.pl
0.399 KB
November 23 2023 4:02:19
root
0644
Config_heavy.pl
52.96 KB
November 23 2023 4:02:19
root
0644
Cwd.pm
17.243 KB
November 23 2023 4:02:19
root
0644
DynaLoader.pm
10.184 KB
November 23 2023 4:02:19
root
0644
Errno.pm
4.815 KB
November 23 2023 4:02:19
root
0644
Exporter.pm
2.312 KB
November 23 2023 4:02:19
root
0644
Fcntl.pm
2.105 KB
November 23 2023 4:02:19
root
0644
FileHandle.pm
2.062 KB
November 23 2023 4:02:19
root
0644
IO.pm
0.458 KB
November 23 2023 4:02:19
root
0644
POSIX.pm
19.87 KB
November 23 2023 4:02:19
root
0644
SelectSaver.pm
0.336 KB
November 23 2023 4:02:19
root
0644
Socket.pm
13.539 KB
November 23 2023 4:02:19
root
0644
Symbol.pm
2.05 KB
November 23 2023 4:02:19
root
0644
XSLoader.pm
3.874 KB
November 23 2023 4:02:19
root
0644
attributes.pm
2.997 KB
November 23 2023 4:02:19
root
0644
base.pm
8.703 KB
November 23 2023 4:02:19
root
0644
bytes.pm
0.437 KB
November 23 2023 4:02:19
root
0644
bytes_heavy.pl
0.74 KB
November 23 2023 4:02:19
root
0644
constant.pm
5.603 KB
November 23 2023 4:02:19
root
0644
feature.pm
4.702 KB
November 23 2023 4:02:19
root
0644
fields.pm
4.891 KB
November 23 2023 4:02:19
root
0644
integer.pm
0.168 KB
November 23 2023 4:02:19
root
0644
lib.pm
2.23 KB
November 23 2023 4:02:19
root
0644
locale.pm
3.341 KB
November 23 2023 4:02:19
root
0644
overload.pm
4.337 KB
November 23 2023 4:02:19
root
0644
overloading.pm
0.941 KB
November 23 2023 4:02:19
root
0644
parent.pm
0.449 KB
November 23 2023 4:02:19
root
0644
re.pm
8.498 KB
November 23 2023 4:02:19
root
0644
strict.pm
1.568 KB
November 23 2023 4:02:19
root
0644
utf8.pm
0.306 KB
November 23 2023 4:02:19
root
0644
utf8_heavy.pl
26.659 KB
November 23 2023 4:02:19
root
0644
vars.pm
1.121 KB
November 23 2023 4:02:19
root
0644
warnings.pm
25.333 KB
November 23 2023 4:02:19
root
0644

NineSec Team - 2022