The call

&DISP_HTML(&POPULATE_TEMPLATE(&READ_RECORD("/var/www-ssl/html/dartcart
+/o_summary.html"),\%in))

[download]

The Sub line 409

sub POPULATE_TEMPLATE($%;$) {

    # Arguments: <'template_string'> <Hash_ref> <'option word'>
    # Prototype: scalar, hash ref., scalar
    # Return: scalar

    # Reads a formated template string.
    # This string should contain hash key names bracketed by percent s
+igns (e.g. %name% ).
    # Associated values in the referenced hash are substituted 'in-pla
+ce'.
    # 
    # The 'option word' = raw disables the tag cleanup.  Used in debug
+ging.

    my ($first, $last, $template_string, @message_block, %internal);

    $template_string = $_[0] 
    %internal = %{$_[1]};
     ...

[download]

The Warning root@ubuntu11:/usr/lib/cgi-bin# Fri Apr 6 15:42:42 2012 quick8.cgi: Prototype after '%'for main::POPULATE_TEMPLATE : $%;$ at quick8.cgi line 409.
The sub POPULATE_TEMPLATE ($%;$) worked for Perl 5.6., 5.8, and in 5.10? and fails Perl 5.12.4.
Any Ideas? Cant seem to find any references prototype usage this manor and the updated syntax. My Perl programmer has moved on.

In reply to sub Prototype Syntax by fred01

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.