uawdijnntqw1x1x1
IP : 216.73.216.23
Hostname : web17.us.cloudlogin.co
Kernel : Linux web17.us.cloudlogin.co 5.10.238-xeon-hst #1 SMP Thu Jun 5 12:15:42 UTC 2025 x86_64
Disable Function : None :)
OS : Linux
PATH:
/
home
/
.
/
..
/
bin
/
hexdump.pl
/
/
#!/usr/bin/perl -w use strict; use Data::HexDump; use FileHandle; my $prgname = "hexdump"; my $file = shift; my $fh; if ($file) { die "$prgname: $file: Is a directory\n" if -d $file; $fh = new FileHandle $file; die "$prgname: $file: $!\n" unless defined $fh; my $f = new Data::HexDump; $f->fh($fh); $f->block_size(1024); print while $_ = $f->dump; close $fh; } else { # read STDIN } sub Usage { die "Usage: $prgname [FILE]\n" . "Dump FILE, or standard input, to standard output.\n\n" . "With no FILE, or when FILE is -, read standard input.\n"; }
/home/./../bin/hexdump.pl