Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

A real challenge

by tachyon (Chancellor)
on Jul 16, 2001 at 16:59 UTC ( #97005=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #!"#$%&'()*+,-./0123456789:;<=>?@
    #ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
    ...
    #ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`
    #abcdefghijklmnopqrstuvwxyz{|}~
    print "Show me the encoding!\n";
    
  2. or download this
    sub print_enc {
        my $file = shift;
    ...
        }
        print "\nCount $count\n";
    }
    
  3. or download this
    @unencoded = (
    35,33,34,35,36,37,38,39,40,41,
    ...
    65,79,99,); # Count 333 chars
    
    print chr($_) for @encoded;
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://97005]
Approved by root
help
Chatterbox?
[atcroft]: PriNet: %hash = ();? or foreach my $k ( keys %hash ) { delete $hash{$k}; }?
[PriNet]: go figure, i just tried that, it retains some of the values (not the key) of the pre-assigned value

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (2)
As of 2017-06-28 02:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How many monitors do you use while coding?















    Results (619 votes). Check out past polls.