|
|
Perl ExampleThese two procedures simply read/dump a whole line. A more advanced script would of course manipulate the $_ object.We assume a Connector attribute called Line and us writing the writeEntry and readEntry necessary to write a Parser. (see Script Parsers)sub writeEntry{ $result = $entry->getString("Line"); $out->write ( $result ); } sub readEntry{ $_ = $inp->readLine(); $entry->setAttribute("Line", $_); }
|
|
|