Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim process As New Process
With process
With .StartInfo
.FileName = "perl.exe"
.Arguments = "filename.pl"
.WorkingDirectory = "C:\Perl\eg"
End With
.Start()
End With
End Sub

using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.Security.Cryptography;
namespace Decode
{
public class cTripleDES
{
private byte[] m_key;
private byte[] m_iv;
private TripleDESCryptoServiceProvider m_des = new TripleDESCryptoServiceProvider();
private UTF8Encoding m_utf8 = new UTF8Encoding();
public cTripleDES(byte[] key, byte[] iv)
{
this.m_key = key;
this.m_iv = iv;
}
public string Decrypt(string text)
{
string str = null;
byte[] buffer = null;
byte[] bytes = null;
try
{
buffer = Convert.FromBase64String(text);
bytes = this.Transform(buffer, this.m_des.CreateDecryptor(this.m_key, this.m_iv));
str = this.m_utf8.GetString(bytes);
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
}
return str;
}
public byte[] Transform(byte[] input, ICryptoTransform cryptoTransform)
{
CryptoStream stream = null;
MemoryStream stream2 = null;
byte[] buffer = null;
stream2 = new MemoryStream();
stream = new CryptoStream(stream2, cryptoTransform, CryptoStreamMode.Write);
stream.Write(input, 0, input.Length);
stream.FlushFinalBlock();
stream2.Position = 0L;
buffer = new byte[((int)(stream2.Length - 1L)) + 1];
stream2.Read(buffer, 0, buffer.Length);
stream2.Close();
stream.Close();
return buffer;
}
}
class Program
{
static void Main(string[] args)
{
byte[] key = new byte[] { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 0x10,
0x11, 0x12, 0x13, 20, 0x15, 0x16, 0x17, 0x18 };
byte[] iv = new byte[] { 0xff, 70, 60, 50, 40, 30, 20, 10 };
cTripleDES tripleDES = new cTripleDES(key, iv);
string str = tripleDES.Decrypt(args[0]);
Console.WriteLine("String decoded: " + str);
Console.ReadLine();
}
}
}

Namespace System.Text
<Serializable, ComVisible(True)> _
Public Class ASCIIEncoding
Inherits Encoding
<Serializable> _
Friend MustInherit Class BaseCodePageEncoding
Inherits EncodingNLS
Implements ISerializable
<Serializable> _
Friend NotInheritable Class CodePageEncoding
Implements ISerializable, IObjectReference
<Serializable> _
Friend Class DBCSCodePageEncoding
Inherits BaseCodePageEncoding
Implements ISerializable
<Serializable, ComVisible(True)> _
Public MustInherit Class Decoder
<Serializable> _
Public NotInheritable Class DecoderExceptionFallback
Inherits DecoderFallback
Public NotInheritable Class DecoderExceptionFallbackBuffer
Inherits DecoderFallbackBuffer
<Serializable> _
Public MustInherit Class DecoderFallback
Public MustInherit Class DecoderFallbackBuffer
<Serializable> _
Public NotInheritable Class DecoderFallbackException
Inherits ArgumentException
<Serializable> _
Friend Class DecoderNLS
Inherits Decoder
Implements ISerializable
<Serializable> _
Public NotInheritable Class DecoderReplacementFallback
Inherits DecoderFallback
Public NotInheritable Class DecoderReplacementFallbackBuffer
Inherits DecoderFallbackBuffer
<Serializable, ComVisible(True)> _
Public MustInherit Class Encoder
<Serializable> _
Public NotInheritable Class EncoderExceptionFallback
Inherits EncoderFallback
Public NotInheritable Class EncoderExceptionFallbackBuffer
Inherits EncoderFallbackBuffer
<Serializable> _
Public MustInherit Class EncoderFallback
Public MustInherit Class EncoderFallbackBuffer
<Serializable> _
Public NotInheritable Class EncoderFallbackException
Inherits ArgumentException
<Serializable> _
Friend Class EncoderNLS
Inherits Encoder
Implements ISerializable
<Serializable> _
Public NotInheritable Class EncoderReplacementFallback
Inherits EncoderFallback
Public NotInheritable Class EncoderReplacementFallbackBuffer
Inherits EncoderFallbackBuffer
<Serializable, ComVisible(True)> _
Public MustInherit Class Encoding
Implements ICloneable
<Serializable> _
Public NotInheritable Class EncodingInfo
<Serializable, ComVisible(True)> _
Friend MustInherit Class EncodingNLS
Inherits Encoding
<Serializable> _
Friend Class EUCJPEncoding
Inherits DBCSCodePageEncoding
Friend Enum ExtendedNormalizationForms
<Serializable> _
Friend NotInheritable Class GB18030Encoding
Inherits DBCSCodePageEncoding
Implements ISerializable
<Serializable> _
Friend NotInheritable Class InternalDecoderBestFitFallback
Inherits DecoderFallback
Friend NotInheritable Class InternalDecoderBestFitFallbackBuffer
Inherits DecoderFallbackBuffer
<Serializable> _
Friend Class InternalEncoderBestFitFallback
Inherits EncoderFallback
Friend NotInheritable Class InternalEncoderBestFitFallbackBuffer
Inherits EncoderFallbackBuffer
<Serializable> _
Friend Class ISCIIEncoding
Inherits EncodingNLS
Implements ISerializable
<Serializable> _
Friend Class ISO2022Encoding
Inherits DBCSCodePageEncoding
<Serializable> _
Friend Class Latin1Encoding
Inherits EncodingNLS
Implements ISerializable
<Serializable> _
Friend NotInheritable Class MLangCodePageEncoding
Implements ISerializable, IObjectReference
Friend Class Normalization
<ComVisible(True)> _
Public Enum NormalizationForm
<Serializable> _
Friend Class SBCSCodePageEncoding
Inherits BaseCodePageEncoding
Implements ISerializable
<Serializable, ComVisible(True), DefaultMember("Chars")> _
Public NotInheritable Class StringBuilder
Implements ISerializable
<Serializable> _
Friend NotInheritable Class SurrogateEncoder
Implements ISerializable, IObjectReference
<Serializable, ComVisible(True)> _
Public Class UnicodeEncoding
Inherits Encoding
<Serializable> _
Public NotInheritable Class UTF32Encoding
Inherits Encoding
<Serializable, ComVisible(True)> _
Public Class UTF7Encoding
Inherits Encoding
<Serializable, ComVisible(True)> _
Public Class UTF8Encoding
Inherits Encoding
End Namespace

int main()
{
pid_t pid;
pid=fork();
if(pid<0){
fprintf(stderr,"that bai");
exit(-1);
}
else if(pid==0){
execlp("/bin/ls","ls",NULL);
}
else{
wait(NULL);
printf("thanh cong")
exit(0);
}
}