RosettaCodeData/Task/Copy-stdin-to-stdout/Refal/copy-stdin-to-stdout.refal

$ENTRY Go {
    , <Card>: {
        0 = ;
        e.Line = <Go <Prout e.Line>>;
    };
};