-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 On Mon, Dec 05, 2011 at 11:05:48AM -0600, Joel Sherrill wrote:
[...] >> $AFTER_BODY_OPEN = >> '<A HREF="http://www.rtems.com" target="Text Frame"> >> <IMG align=right BORDER=0 SRC="../images/rtems_logo.jpg" ALT="RTEMS >> Logo"> </A> >> <H1>RTEMS @VERSION@ On-Line Library</H1> >> '; >> >> 1; [...] > What does the "1;" do? That's a classical Perl idiom: module files are "incorporated" by eval()ing their content; the result of eval tells the client whether things went well. Since the result of evaling a sequence of statements/expressions is the value of the last one, one typically ends a module with "1", meaning "all is well". HTH regards - -- tomás -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.6 (GNU/Linux) iD8DBQFO3nIqBcgs9XrR2kYRAjHBAJ4yj2nwl+/+aKICF0wEfhpc0gpavQCffqAg 2lRhSGDYK6CFVann/TtlDSw= =CLlu -----END PGP SIGNATURE-----
