My Account Log In Walkthrough IDE Integrations Contact  
Polystyle
Point And Click Source Code
Formatter & Obfuscator

Click Here To Download A Free Trial!
Home Features Documentation Buy Formatter Buy Obfuscator Download  

 



  • PHP Obfuscator

  • C# Obfuscator

  • Perl Obfuscator

  • Java Obfuscator

  • Javascript Obfuscator

  • JSP Obfuscator

  • Actionscript Obfuscator

  • C/C++ Formatter

  • Perl Formatter

  • Pascal/Delphi Formatter

  • C# Formatter

  • CSS Formatter

  • CMAC Formatter

  • Java Formatter

  • Javascript Formatter

  • PHP Formatter

  • JSP Formatter

  • HTML/XML Formatter

  • Python Formatter

  • ASP Formatter

  • Visual Basic Formatter

  • Actionscript Formatter

  • Step 1: Unformatted Perl Source

  • Overall Perl Features
  • Step 1: Unformatted Source
  • Step 2: Example Source
  • Step 3: Formatted Source

    Let's start with a real life source file:


    #
    sub cacheout'open {
        open($_[0], $_[1]);
    }
    
    # Close as well
    
    sub cacheout'close {
        close($_[0]);
    }
    
    # But only this sub name is visible to them.
    
    sub cacheout {
        package cacheout;
    
        ($file) = @_;
        if (!$isopen{$file}) {
    	if (++$numopen > $maxopen) {
    	    local(@lru) = sort {$isopen{$a} <=> $isopen{$b};} keys(%isopen);
    	    splice(@lru, $maxopen / 3);
    	    $numopen -= @lru;
    	    for (@lru) { &close($_); delete $isopen{$_}; }
    	}
    	&open($file, ($saw{$file}++ ? '>>' : '>') . $file)
    	    || die "Can't create $file: $!\n";
        }
        $isopen{$file} = ++$seq;
    }
    
    package cacheout;
    
    $seq = 0;
    $numopen = 0;
    
    if (open(PARAM,'/usr/include/sys/param.h')) {
        local($_, $.);
        while () {
    	$maxopen = $1 - 4 if /^\s*#\s*define\s+NOFILE\s+(\d+)/;
        }
        close PARAM;
    }
    $maxopen = 16 unless $maxopen;
    
    1;
    
    

    Next, in Step 2 we'll look at our example source which defines our style.

  • Home Features Documentation Buy Polystyle Buy Obfuscator Download  

    Click Here To Download A Free Trial!

    Copyright © Flashbulb Studios. All rights reserved.