| Apache/2.4.7 (Ubuntu) Linux sman1baleendah 3.13.0-24-generic #46-Ubuntu SMP Thu Apr 10 19:11:08 UTC 2014 x86_64 uid=33(www-data) gid=33(www-data) groups=33(www-data) safemode : OFF MySQL: ON | Perl: ON | cURL: OFF | WGet: ON > / usr / share / perl5 / Debconf / | server ip : 104.21.89.46 your ip : 172.69.130.102 H O M E |
| Filename | /usr/share/perl5/Debconf/Path.pm |
| Size | 291 |
| Permission | rw-r--r-- |
| Owner | root : root |
| Create time | 27-Apr-2025 09:50 |
| Last modified | 23-Feb-2014 22:30 |
| Last accessed | 05-Jul-2025 20:24 |
| Actions | edit | rename | delete | download (gzip) |
| View | text | code | image |
#!/usr/bin/perl
# This file was preprocessed, do not edit!
package Debconf::Path;
use strict;
use File::Spec;
sub find {
my $program=shift;
my @path=File::Spec->path();
for my $dir (@path) {
my $file=File::Spec->catfile($dir, $program);
return 1 if -x $file;
}
return '';
}
1
# This file was preprocessed, do not edit!
package Debconf::Path;
use strict;
use File::Spec;
sub find {
my $program=shift;
my @path=File::Spec->path();
for my $dir (@path) {
my $file=File::Spec->catfile($dir, $program);
return 1 if -x $file;
}
return '';
}
1