⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.133
Server IP:
185.119.109.197
Server:
Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
8.1.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
proc
/
thread-self
/
root
/
usr
/
share
/
usermin
/
mailbox
/
Edit File: copy.cgi
#!/usr/bin/perl # Copy (or move) all messages from one folder to another use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; our (%text, %in, %config); require './mailbox-lib.pl'; &ReadParse(); my @folders = &list_folders(); my $folder = $folders[$in{'idx'}]; my $dest = $folders[$in{'dest'}]; &ui_print_unbuffered_header(undef, $text{'copy_title'}, ""); print &text('copy_doing', &html_escape($folder->{'name'}), &html_escape($dest->{'name'})),"<p>\n"; &mailbox_copy_folder($folder, $dest); print $text{'copy_done'},"<p>\n"; if ($in{'move'}) { print &text('copy_deleting', &html_escape($folder->{'name'})),"<p>\n"; &mailbox_empty_folder($folder); print $text{'copy_done'},"<p>\n"; } &ui_print_footer($config{'mail_system'} == 4 ? "list_ifolders.cgi" : "list_folders.cgi", $text{'folders_return'});
Simpan