#!/usr/bin/perl -I /home/klaus/UG/ug/pm -w

use ug;

ug 'start','df2d';
print ug 'ls';
ug 'print ls';
ug 'a=12';
ug 'print ug','print a';
ug 'end';












