RDW #8 - Raetsel der Woche Nummer 8
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Regeln: * Bitte nicht vor Ablauf der ersten 72 Stunden ( = drei Tage ) nach
~~~~~~~ Veroeffentlichung Hinweise (Spoiler) oder Loesungen veroeffent-
lichen!
* Wenn diese Zeit abgelaufen ist, werde ich einen Thread mit passen-
dem Titel erstellen, in dem die Loesungen gepostet werden und dis-
kutiert werden koennen.
* Die Loesungen sollten nicht nur gepostet, sondern auch an mich ge-
mailt werden, damit ich sie testen, "bewerten" und zusammenfassen
kann. Die Adrese dafuer lautet:
crian <---AT---> perl <---MINUS---> community <---DOT---> de
Im Betreff sollte 'RDW' und die Nummer des Raetsels stehen. Hilf-
reich waere neben dem Quellcode der Username im Forum sowie Perl-
und OS-Version, falls Du diese kennst.
* Verstaendnisfragen duerfen in diesem Thread gestellt werden, aber
Tipps und (Teil-) Loesungen sind hier unerwuenscht.
* Ich werde die eingeschickten Programme im Netz zur Verfuegung
stellen, so dass gerade lange Quellcodes nicht (komplett)
gepostet werden muessen.
* Zur Verwendung von Modulen: Ich moechte diese nicht generell aus-
schliessen, aber wenn quasi die komplette Aufgabe durch die Ver-
wendung eines Moduls ersetzt werden kann, ist dies vielleicht nicht
der Sinn der Aufgabe gewesen.
Aufgabe: Schreibe einen kleinen Compiler, der ein paar Zeilen Perl in PASM
~~~~~~~~ verwandelt.
Beispiel:
Perl Quelle:
$a = 13;
$b = 10;
$c = $a + $b;
print $c;
PASM Ergebnis:
set I0, 13
set I1, 10
add I2, I0, I1
print I2
Dieser Vorschlag stammt von sri und Fragen gehen an ihn, da ich
dieses Wochenende nicht in Bielefeld bin =)