# Where $can is a Canvas object,
#   and $psfile is the file to write to ...

$can->postscript(-file => $psfile);