■

 class Screen {
   void outputToStdout(string s){
     write(s);
   }
 }

 class Printer {
   void print(string s){ }
 }

 class PrinterScreenAdapter {
   inherit Printer;
   Screen screen;

   void create(Screen s) {
     screen = s;
   }

   void print(string s) {
     screen.outputToStdout(s);
   }
 }

 int main() {
   object screen = Screen();
   object adapter = PrinterScreenAdapter(screen);

   adapter.print("Test success");

   return 0;
 }

Pike でオブジェクト指向。
マニュアル読んだけど、(Javaの様な)オブジェクト指向については、
あまり詳しく記述されていなかった。
クラスの他に、プログラム単位でも再利用出来そうな予感（自信無し）
# SEE 'program' キーワード