#!/usr/bin/perl

use Forth::Interp;

Forth::Interp->new->loop;