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

Finite Automata Question Generator

by suaveant (Parson)
on Oct 04, 2001 at 20:55 UTC ( #116759=obfuscated: print w/ replies, xml ) Need Help??

Ok, this is no great and powerful obfu that will stump users for ages to come, it's more of a funny obfu taking advantage of the plethora of Finite Automata questions floating through the PM... So, I thought, why not get rid of the middle man. No longer do you have to wait for Clueless Newbies(tm) or Oxford Cream to come along and post a question of finite automatae, you can have hours of fun generating your own!
#!/usr/bin/perl -w use strict; # For those of you who just can't get enough Finite Automata # questions! ;-) $_=q~my@a=(['Hello','Greeti ngs','Hi','', 'What\'s_up','Honored_Monks ','Ummm'],["\n "],['my_teacher_assigned_us _a','I_was_wond ering,_if_I_wanted_to,_how_ would_I_write_a' ,'I_have_no_clue_when_to_st art,_I_need_to_w rite_a','URGENT!_URGENT!!_U RGENT!!!_I_neeeee d_help_with_this._Can_someo ne_tell_me_how_to_ write_or_gi ve_me_some_code_to_ perform_ope rations_of'],['_fini te_automata ._'],['The_requireme nts_can_be_ found_at_this_URL:_ht tp://www.my skool.edu/ class/home work/finite_automata/do_i t_yourself /assignment 1.htm.','It_must_be_able_ to_process_ up_to___RAN D___states_over_the_alpha bet_includ ing_1,3_and _7._Run_these_test_string s_against_i t..._1337_3 1337_133t_and_suX#r.','It _need_to_do _something_ with_states_and_an_alphab et,_but_I\ 'm_not_good _with_geography_so_really _need_help! ','','The_c ode_I_have_ started_looks_like_this:_#inc lude_<stdio .h>__void_main()_{_printf("Hel lo_World\n" );_}..._if_anyone_can_tell_me_ where_to_go _from_here_I_would_greatly_appr eciate_it.' ],["\n________________"],['Thank _You','Oh,_ and_I_need_this_by_Friday','Pleas e_please_PL EEEZ!','','Thank_you_for_this_wond erful_site! ','I_send_you_this_file_in_order_t o_have_your _advice','c lueless_newb ie','pearl_ user'],["\n" ]);for(@a){m y@b=@$_;$_= $b[rand@b];s /__RAND__/in t(rand(30)) /ge;s/_/chr( 32)/eg;print ;}~;s/\s//g ;eval$_;#### by Suaveant!!

Update semicolon after use strict

                - Ant
                - Some of my best work - Fish Dinner

Comment on Finite Automata Question Generator
Download Code
Re: Finite Automata Question Generator
by strfry() (Monk) on Oct 05, 2001 at 16:38 UTC
    haha! ++ for "Oh, and I need this by Friday." (8

    strfry()
Re: Finite Automata Question Generator
by Hero Zzyzzx (Curate) on Oct 05, 2001 at 20:45 UTC
    print "What does Oxford Cream mean?\n\n"; print "Oxford Cream means ".$$Oxford_Cream."\n";

    <Stupid way of asking what Oxford Cream refers to>

    -Any sufficiently advanced technology is
    indistinguishable from doubletalk.

      Oxford Cream refers to chatterbox discussion as to the fact that the flood of Finite Automata questions the other day apparently were from a CS class at Oxford University...

      Update Someone referred to them as The Oxford Cream, but I'm not sure who...

                      - Ant
                      - Some of my best work - Fish Dinner

Re: Finite Automata Question Generator
by ambrus (Abbot) on Feb 28, 2004 at 21:29 UTC

    Very good obfu.

    However it won't compile for me unless I put a semicolon after use strict.

    Update: it turns out that it does compile, but only with older perls. The feature of the strict pragma got fixed out somewhere near perl 5.8.

Re: Finite Automata Question Generator
by Anonymous Monk on Aug 09, 2009 at 09:26 UTC
    ca i convert dfa to nfa

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://116759]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2014-04-17 23:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (458 votes), past polls