write

$pl->write([plfile])