@Ghazascanner
_2019runbot
Ghazascanner File Manager
server :Linux hosjweb-prod3 6.12.0-107.59.3.2.el9uek.x86_64 #1 SMP PREEMPT_DYNAMIC Mon Dec 22 10:16:59 PST 2025 x86_64
Current Path :
/
homepage
/
v-mt
/
tools
/
Path :
Upload File :
New :
File
Dir
//homepage/v-mt/tools/remove-object
#!/usr/bin/perl -w use strict; use lib 'lib'; use MT; my $mt = MT->new or die MT->errstr; my($class, $id) = @ARGV; die "usage: $0 <object-class> <object-id>" unless $class && $id; eval "use $class;"; die "Error loading '$class': $@" if $@; my $obj = $class->load($id) or die "Load of object with ID $id failed: " . $class->errstr; $obj->remove;