Mr.Combet Webshell
Your IP :
172.18.0.175
Server IP :
172.67.223.119
Server :
Linux crmarketing.1092.w795 4.19.0-18-amd64 #1 SMP Debian 4.19.208-1 (2021-09-29) x86_64
Server Software :
Apache/2.4.38 (Debian)
PHP Version :
7.4.33
Add File :
Submit
Add Directory :
Submit
Dir :
~
/
usr
/
share
/
perl5
/
Debconf
/
Element
/
Dialog
/
Edit File Name :
String.pm
#!/usr/bin/perl -w # This file was preprocessed, do not edit! package Debconf::Element::Dialog::String; use strict; use base qw(Debconf::Element); sub show { my $this=shift; my ($text, $lines, $columns)= $this->frontend->makeprompt($this->question); my $default=''; $default=$this->question->value if defined $this->question->value; my @params=('--inputbox'); push @params, $this->frontend->dashsep if $this->frontend->dashsep; push @params, ($text, $lines + $this->frontend->spacer, $columns, $default); my $value=$this->frontend->showdialog($this->question, @params); if (defined $value) { $this->value($value); } else { my $default=''; $default=$this->question->value if defined $this->question->value; $this->value($default); } } 1
Save