in reply to Re^2: Too Much Perl?
in thread Too Much Perl?

"Never"? This is Perl! 

{
    package Tie::ColorTest;

    sub TIESCALAR
    {
        my( $pkg, $color ) = @_;
        bless \$color, $pkg
    }

    sub FETCH
    {
        my $self = shift;
        $_->{'color'} eq $$self
    }
}

tie my $red, 'Tie::ColorTest' => 'red';

[download]
We're building the house of the future together.

Replies are listed 'Best First'.
Re^4: Too Much Perl?
by GrandFather (Saint) on Apr 27, 2006 at 18:12 UTC

    Oh, a red tie. Does it have flashing lights and play a tune?

    DWIM is Perl's answer to Gödel
[reply]

      I guess it could. If it's a red tie, that makes it a power tie, which means it would certainly be capable of running lights and sound.

      print substr("Just another Perl hacker", 0, -2);
      		 - apotheon
      CopyWrite Chad Perrin

[reply]

In Section Meditations