Help for this page

Select Code to Download


  1. or download this
        foreach my $watch_string ( $schema->resultset('WatchString')->all 
    +)
    
    # Could be...
    ...
    while( my $line <INPUT> )
    {
        foreach my $watch_string ( $ws->all )
    
  2. or download this
    my $ws = $schema->resultset('WatchString');
    $ws->result_class('DBIx::Class::ResultClass::HashRefInflator');
    ...
        {
            if( $line =~ $ws->{match_re} ) # all hashrefs now, no objects.
            {