Mudar script perl para bash

[General]

Olá ... Tudo bem ?

Por favor pessoal , estou estudando shell bash e tem muitas coisas que ainda não consigo fazer. Segue abaixo um script em perl que gostaria de transforma-lo em bash . Alguém poderia fazer isso se não for pedir demais ?
Tem algumas partes que estou apanhando muito e não consegui completa-lo :
Obs.: esse script é usado juntamente com o karamba ou Superkaramba para visualização dos e-mails (na barra) na tela !


#!/usr/bin/perl
use Net::POP3;

my $FileName = $ENV{HOME} . "/.perlpop/" . $ARGV[0];

open(PASS, $FileName.".data");
$_ = <PASS>;
close PASS;
chomp;
tr/a-zA-Z0-9/n-za-mN-ZA-M5-90-4/;
split(/ /);

my ($ServerName, $UserName, $Password) = @_;

my $pop3 = Net::POP3->new($ServerName);

if (!$pop3) {
print "servidor inacessível";
}

my $Num_Messages = $pop3->login($UserName, $Password) + 0;
my $Old_Messages;

if (open(INFO, "+<$FileName.access") != 0) {
chomp ($Old_Messages = <INFO>);
$Old_Messages += 0;
seek INFO, 0, SEEK_SET;
} else {
open(INFO, ">$FileName.access");
}

print INFO $Num_Messages;
close INFO;

if ( $Num_Messages == 1 ) {
print $Num_Messages ." mensagem\n";
}
elsif ( $Num_Messages > 1 ) {
print $Num_Messages ." mensagens\n";
}
else {
print "nenhuma nova\n";
}

if ( $Num_Messages > $Old_Messages ) {
system "play /usr/share/sounds/KDE_Beep_Phone_2.ogg";
}

$pop3->quit();

Desde já agradeço a ajuda !

[General]

Olá ... Tudo bem ?

E aí pessoal , alguma resposta . Nem que seja parcial !

Obrigado !

[1c3m4n]

pedir pra fazer o script eh um poko d+ :P
se vc pedir ajuda em alguma coisa especifica acho mais facil conseguir resposta, mas enqto isso veja esses links, se eh q jah nao viu:

http://aurelio.net/shell/canivete.html
http://www.tldp.org/LDP/Bash-Beginners-Guide/html/

[terra_jr]

Conseguiu resolver o problema?!

Se não,
Descreva o que realmente voce quer que o script faça.!?


Eu nunca usei o tal karamba. E nem sei o resultado desse script ai em
perl, mas fala o q ele tem q fazer, quem sabe podemos ajudar.!!!!

[General]

Olá ... Tudo bem ?

Obrigado por se interessar por minha questão !

Bom, eu crio um diretório no /home/usuário com o nome .perlpop, com 1 arquivo dentro com o nome 1.data contendo meus dados de meu e-mail assim :
servidorpop usuário senha , exatamente nessa ordem divididos por um espaço .
Esse script se conecta em minha conta, verifica o nº de e-mails na cx de entrada
e usa o programa karamba para exibir sua saída na tela. Cria outro arquivo dentro do .perlpop com o nome 1.access para armazenar o nº que encontrou . Na proxima vez que se conecta, compara o nº encontrado com o arquivado, se for maior emite um som para avisar que tem + mensagem .
O karamba é um programa que serve para apresentar algumas informações na tela,no meu caso são as duas barras com ícones e algumas informações, tal como nesse link (veja meu desktop ):

http://img108.imageshack.us/full.php...apshot11za.png

Aquí esta o tutoral do cara que criou(melhorou)isso, é um fórum e o nome do usuário é "edudobay":

http://www.kuruminlinux.com.br/comun...r=asc&start=20

Obs .: No karamba existe um arquivo de configuração onde passamos as informações p/ que seja executado o script e a saída venha p/ a tela.

[terra_jr]

Karamba hein!?