Hello, Is it possible in Perl to redefine variable assignment? In Tcl I can rename the set command to say origSet and then define a new set which does something extra for global variables and then calls origSet.

I would like to do likewise in Perl, to wrap the assignment operator so that for global variables, I can do some extra work transparently to the user.

Thanks.

-William


Hi,

What I want to do is propagate global variable values between Perl and Tcl. I am successfully doing this in Tcl to Perl and seek the way to do this in Perl to Tcl.

I need to somehow trap on all global variable store commands and get the name of the variable and its value so that I can propagate the value to Tcl.

Seems to me like best would be a way to trap all calls to STORE without modifying the underlying Perl implementation directly. (i.e. user can pick whatever version of perl they want and the code works with it to trap calls to STORE).

Thanks.

-William

In reply to How to wrap Perl assignment operator? by William_K_F

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.