procedure main()
    write(open("/dev/lp0","w"),"Hello, world!")
end