package PPD::PJL; use PPD; sub add_jcl() { set('j/JCLBegin', '<1B>%-12345X@PJL<0A>'); set('j/JCLToPSInterpreter', '@PJL ENTER LANGUAGE = POSTSCRIPT<0A>'); set('j/JCLEnd', '<1B>%-12345X@PJL EOJ<0A><1B>%-12345X<0A>'); } 42;