403Webshell
Server IP : 74.208.236.79  /  Your IP : 216.73.216.157
Web Server : Apache
System : Linux infongp-us50 4.4.400-icpu-108 #2 SMP Wed Feb 11 10:12:42 UTC 2026 x86_64
User : u93192080 ( 6162215)
PHP Version : 8.4.22
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /bin/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /bin/aptitude-changelog-parser
#!/usr/bin/perl

use strict;
use warnings;

eval {
    require Dpkg::Changelog::Parse;
    Dpkg::Changelog::Parse->import();
    1;
} or do {
    warn "warning: Dpkg::Changelog::Parse not present, install libdpkg-perl\n";
    exit 0;
};

# Usage: aptitude-changelog-parser [<filename> [<from-version>]]

my %opts;
if (scalar @ARGV >= 1) {
    $opts{file} = shift @ARGV;
}
if (scalar @ARGV == 1) {
    $opts{from} = $ARGV[0];
} else {
    $opts{all} = undef;
}

print join "\n", changelog_parse(format => 'rfc822', %opts);

Youez - 2016 - github.com/yon3zu
LinuXploit