[Rio-pm] BrainFuck Interprer
Tiago Peczenyj
tiago.peczenyj em gmail.com
Sexta Janeiro 11 04:59:44 PST 2013
Ola
estou com preguiça de analisar o seu codigo todo mas tenho algumas
observaçoes
1) o seu metodo de leitura esta errado. Vc esta ignorando o resto da linha,
os outros caracteres.
eu faria assim:
sub getchar{
sysread STDIN, my $buf, 1;
return (ord($buf));
}
2) ao inves de fazer
foreach ...
when (condicao que parece um if)
faça
foreach ... {
my $i = ...
given($i){
when('+'){ }
}
}
2013/1/11 Aureliano Guedes <guedes_1000 em hotmail.com>
> Ola mongens,
>
> Como alguns sabem eu estava tentando fazer um interpretador para brainfuck
> em Perl.
>
> Portanto segue o que consegui ate agora: http://pastebin.com/gJKizdYS
>
> Um "script brainfuck" para testarem, ele converte letras munusculas para
> maiusculas: http://pastebin.com/kzMMpUsA
>
> Deve ser executado assim: perl mybf.pl bf.b
>
> Mas estou com problemas. Toda vez que executo me retorna : Can't use
> when() outside a topicalizer at mybf.pl line 36, <> line 1.
>
> Alguem sabe o que esta acontecendo, e pode me ajudar.
>
> Desde já, grato.
>
> Att
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
--
Tiago B. Peczenyj
Linux User #405772
http://about.me/peczenyj
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20130111/bb115fa9/attachment.html>
Mais detalhes sobre a lista de discussão Rio-pm