Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

comment on

( [id://3333]=superdoc: print w/replies, xml ) Need Help??

Ok this is really weird but it runs in Komodo don't ask me how. The expression is what I got from using Regex::Assemble. Please let me know if there is something wrong with Komodo or the regex assemble.

use strict; use Regexp::Assemble; my $ra = Regexp::Assemble->new; $ra->add( 'outlook\s+for\s+any\s+rating|(?:rating|if\s+on\s+negative|M +icrosoft|suggesting\s+an|may\s+contain\s+statements\s+about\s+future\ +s+events\,|business\s+conditions\s+and\s+the)\s+outlook|guidance\s+(? +:to\s+approve|facility)' ); $ra->add( '(?:authoritative|revenue\s+recognition|invaluable\s+practic +al|valuable|regulatory|technical|under\s+the|staff\'s|judicial|SEC|FD +A|Treasury(?:\s+Department)?|specific|implementation|their|government +|any\s+ruling|college|absent|\s+his|interim|intrepretive|transition|a +dministrative|procedural|related|applicable|accounting|definitive|sup +reme\s+court|superceding|IRS|Internal\s+Revenue\s+Service|valued|EITF +\s+accounting)\s+guidance' ); $ra->add( 'guidance\s+(?:and\s+rules|promulgated(?:\s+thereunder)?|in\ +s+SFAS)|(?:provided|issued)\s+by\s+(?:the\s+)?(?:SEC|Securities\s+and +\s+Exchange\s+Commission|Internal\s+Revenue\s+Service|Secretary|Unite +d\s+States|Financial\s+Accounting)' ); $ra->add( '(?:other|applicable)\s+guidance\s+issued|according\s+to\s+t +he\s+guidance\s+contained|provide\s+guidance\s+to\s+directors|receivi +ng\s+guidance' ); $ra->add( '(?:current|other)\s+guidance\s+(?:under|from)|assumes\s+gui +dance\s+of\s+(?:the|a)\s+(?:company|board|talented\s+team|compensatio +n)|guidance\s+(?:system|software|technology)' ); $ra->add( '(?:future\s+statutes|ordinances|orders|rules|regulations)\, +\s+guidance|pursuant\s+to\s+SEC\s+guidance|Outlook\s+Pointe|guidance\ +s+line\s+of\s+credit' ); $ra->add( 'guidance\s+from\s+(?:the\s+)?(?:FDA|Financial\s+Accounting\ +s+Standards\s+Board)|(?:counsel|advice|information|circular|regulatio +n|code)\s+and\s+guidance' ); $ra->add( 'forward\s+to\s+his\s+guidance|guidance\s+received\s+by\s+th +e\s+Company|section\s+409A\s+transition\s+guidance|absent\s+guidance\ +s+from\s+the\s+Commission' ); $ra->add( 'the\s+guidance\s+from\s+the\s+OCA|Internal\s+Revenue\s+Serv +ice\s+has\s+issued\s+guidance|(?:wisdom|technical\s+assistance|necess +ary\s+supervision|leadership)\s+and\s+guidances?' ); $ra->add( 'guidance\s+(?:on|of|in)\s+(?:de\-recognition|APB\s+25|S?FAS +\s+No\.\s+144|SFAS\s+No\.\s+(?:150|13|123)|ARB|SEC\s+Release|SOP\s+90 +\-7|Emerging\s+Issues|SAB\s+101|determining\s+whether\s+multiple)' ); $ra->add( 'provides?\s+guidance\s+(?:on\s+(?:how)?|for)\s+(?:to\s+iden +tify|uncertain\s+tax|whether)|(?:interpretation|permits|knowledge|reg +ulations|successor\s+statutes|policy(?:\s+statements)?)\s+(?:or|\,)\s ++guidance' ); $ra->add( 'regarding\s+management\'s\s+plans\,\s+goals\,\s+expectation +s\,\s+guidance|To\s+obtain\s+guidance\s+on|for\s+additional\s+guidanc +e\s+on\s+which\s+number\s+to\s+report' ); $ra->add( 'FD\s+Disclosure\s+of\s+Form\s+8\-K\s+in\s+accordance\s+with +\s+guidance|guidance\s+document\s+promulgated|seek\s+guidance\s+from| +employee\s+handbook\s+for\s+guidance' ); $ra->add( '(?:SAB\s+101|FIN\s+48|EITF\s+00\-14|SOP98\-\d|SFAS\s+\d\d\d +?)\s+(?:also\s+)?provides\s+guidance(?:\s+on\s+whether|related)|Item\ +s+\d\d?\s+pursuant\s+to\s+guidance' ); $ra->add( 'guidance\s+disseminated\s+by\s+the\s+SEC|additional\s+guida +nce\s+to\s+physicians|FASB\s+issued\s+final\s+guidance|informed\s+of\ +s+the\s+guidance\s+relating' ); $ra->add( '(?:\"projection\"|\"intend\")(?:\s+and\s+|\,)\"outlook\"|co +mpany\s+follows\s+the\s+guidance\s+of|guidance\s+should\s+be\s+applie +d\s+prospectively|provides\s+guidance\s+for\s+using\s+fair\s+value' ) +; $ra->add( 'under\s+the\s+guidance\s+and\s+(?:advice\s+of|Procedures|le +adership|counsel|support)|company\s+follows\s+the\s+guidance\s+set\+f +orth\s+in\s+statement' ); $ra->add( 'board\s+will\s+continue\s+to\s+provide\s+guidance|guidance\ +s+requiring\s+the\s+credit|(?:directive|navigation|exemption|practice +|judgments|doctrine|forecast)\,\s+guidance' ); $ra->add( 'guidance\s+(?:is\s+effective|which\s+allowed)|(?:comply\s+w +ith\s+guidance\s+set\s+forth\s+by|guidance\s+available\s+from)\s+the\ +s+(?:treasury|internal\s+revenue\s+service|IRS|SEC|FASB|AICPA)' ); $ra->add( 'guidance\s+(?:prescribed|set\s+forth|issued)\s+by(?:\s+the\ +s+(?:Department|Treasury|AICPA|FASB|SEC))?|(?:action|policy|orders)\s ++or\s+guidance' ); $ra->add( 'Statements\s+in\s+this\s+press\s+release\s+concerning\s+the +\s+company\'s\s+business\s+outlook|guidance\s+regarding\s+the\s+accep +tance\s+of\s+gifts'); $ra->add( 'guidance\s+on\s+(?:recognizing|the\s+application|the\s+iden +tification|when\s+to\s+assess|accounting\s+for\s+revenue)'); print $ra->re;

thanks again for the quick response


In reply to Re^4: error 1073741819 by eversuhoshin
in thread error 1073741819 by eversuhoshin

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



  • Are you posting in the right place? Check out Where do I post X? to know for sure.
  • Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
    <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
  • Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
  • Want more info? How to link or How to display code and escape characters are good places to start.
Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others examining the Monastery: (4)
As of 2024-04-23 20:32 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found