RosettaCodeData/Task/Hello-world-Line-printer/Picat/hello-world-line-printer.picat

main =>
    Printer = open("/dev/lp0", write),
    println(Printer, "Hello, world!"),
    flush(Printer),
    close(Printer).