Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Strategy Handles

by jdporter (Canon)
on Jan 03, 2006 at 21:47 UTC ( #520738=perlmeditation: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    package Output_Strategy::HTML;
    package Output_Strategy::CSV;
    ...
    $output_strategy->render(@data);
    $output_strategy->postamble;
    # whatever
    
  2. or download this
    package Foo;
    use base 'Output_Strategy'; # this is a 'strategy handle class'
    ...
    @Output_Strategy::ISA = ( $opt{'html'}
      ? 'Output_Strategy::HTML'
      : 'Output_Strategy::CSV' );
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlmeditation [id://520738]
Approved by atcroft
Front-paged by kutsu
help
Chatterbox?
[SwaJime]: unless & is higher precedence than <
[SwaJime]: couldn't find bitwise in precedence list for sybase
[SwaJime]: I bet that is why ... and that makes it to be I think terribly written code :-|

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (8)
As of 2017-08-22 18:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Who is your favorite scientist and why?



























    Results (338 votes). Check out past polls.

    Notices?