function vc_format_create_date($table, $val, $row) { return date("m/d/Y", strtotime($val)); }

//PHP5 only
class fuselogic_container
{
   var $__x = array();

   function __construct($path = null)
   {
      static $instances = array();
      $class_name = strtolower(get_class($this));
      if(!isset($instances[$class_name]))
      {
         $instances[$class_name] = $this;
      }
      foreach(get_class_vars($class_name) as $var => $value)
      {
         $this->$var = &$instances[$class_name]->$var;
      }
      $this->__path = isset($path)?$path:getcwd();
   }

   function __get($name)
   {
       $lowercase = strtolower($name);
       if(isset($this->__x[$lowercase]))
       {
          return $this->__x[$lowercase];
       }else
       {
          $this->__x[$lowercase] = $this->$name();
          $instance = &$this->__x[$lowercase];
          return $instance;
       }
   }

   function __call($name,$var)
   {
       if(class_exists($name))
       {
          if(isset($var[0]))
          {
             return new $name($var[0]);
          }else
          {
             return new $name();
          }
       }else
       {
          $this->_start();
          if(@include_once('class.'.$name.'.php'))
          {
             return new $name();
          }
          $this->_end();
       }
   }

   function _start()
   {
      $this->__path_back = getcwd();
      chdir($this->__path);
   }

   function _end()
   {
      chdir($this->__path_back);
   }

   function __set($name,$val)
   {
       $this->__x[$name] = $val;
   }

   function __isset($name)
   {
      $name = strtolower($name);
      if(isset($this->__x[$name]))
      {
         return true;
      }elseif(method_exists($this,$name))
      {
         return true;
      }else return false;
   }
}

// Loop used for two-dimensional iterations for a table
// useful for tabular output
 for(int x = 1;x<=9;x++)
{
 	cout<<endl;
 	for(int i = 1;i<=9;i++)
 	{
   	cout<<"\t"<<x*i;
 	}
}

function validarCodigoReferencia( $str, $pais ){
	global $conn, $paises;
	$str = strtoupper( $str );
	#Primero, que tenga 6 caracteres, sino afuera de con el pichicho.
	if( strlen( $str ) != 6 ){
		return false;
	}else{
		#Dividimos en dos, limpiamos la primer parte de todo lo que no sea letras y la segunda de todo lo que no sea número
		$primeraParte = soloLetras( substr( $str, 0, 3 ) );
		$segundaParte = soloNum( substr( $str, 3, 6 ) );
		#echo $primeraParte . "-" . $segundaParte;
		#Con estas partes generamos un nuevo str
		$strNew = $primeraParte . $segundaParte;
		#Y si no quedo de 6 no es valido.
		if( strlen( $strNew ) != 6 ){
			return false;
		}else{
			#Si quedo de 6 es que es de 3 letras + 3 numeros. Veamos si está en el rango del pais
			$rangoDesde = ord( $paises[$pais]["rangoDesde"] );
			$rangoHasta = ord( $paises[$pais]["rangoHasta"] );
			$esteRango = ord( $strNew{0} );
			#echo $rangoDesde . '-' . $rangoHasta .'-'. $esteRango;
			if( $esteRango > $rangoHasta || $esteRango < $rangoDesde ){
				return false;
			}else{
				return true;
			}
		}
	}
}

#!/usr/bin/perl

use warnings;
use strict;
use Net::OSCAR qw(:standard);

my $screenname = 'screenname';
my $password = 'password';
my $logfile = '~/aimbot.log';

my $oscar;
$oscar = Net::OSCAR->new(capabilities => [qw(extended_status)]);
$oscar->set_callback_im_in(\&im_in);
$oscar->signon($screenname, $password);
while(1) { $oscar->do_one_loop(); }

sub im_in {
	my($oscar, $sender, $message, $is_away) = @_;
    
	# respond to the poor soul still using ICQ
	my $response = "Sorry, I am no longer using ICQ. " .
		"If you need to contact me, try sending me an " .
		"email/Jabber/GTalk message at 'me\@domain.com'. " .
		"(This is an automated response.)\n";
	$oscar->send_im($sender, $response);

	# save the message to the log-file
	open (LOG, ">>$logfile") or print "Oops, can't open logfile.\a\n";
	print LOG scalar(localtime)." [AWAY] " if $is_away;
	print LOG scalar(localtime).(" "x8)."$sender: $message\n";
	close LOG
}

<?

echo phpinfo();

?>

double left,right,top,bottom,nearClip,farClip,xshear,yshear;
float hfov,vfov;

osgProducer::OsgSceneHandler *sceneHandler = viewer.getSceneHandlerList()[0].get();

osgUtil::SceneView *sceneView = sceneHandler->getSceneView();

sceneView->setComputeNearFarMode(osgUtil::CullVisitor::DO_NOT_COMPUTE_NEAR_FAR);

Producer::Camera *cam = viewer.getCamera(0);
  cam->getLensParams(left,right,top,bottom,nearClip,farClip,xshear,yshear);

hfov = cam->getLensHorizontalFov();
vfov = cam->getLensVerticalFov();

cam->setLensPerspective(hfov,vfov,0.1,500,xshear,yshear);

import pywinauto
from pywinauto import *
from pywinauto import application


encoderdir = "C:\\Archivos de programa\Windows Media Components\Encoder"
wmenc = "\wmenc.exe"


app.start _(encoderdir + wmenc)


win = app.window_(title_re  = ".*Media Encoder.*")

# Empezar a codificar (pulsando ctrl+shift+E)
win.TypeKeys("^+E")

# Volver a abrir la ventana
win.Restore ()

# Parar la codificacion
win.TypeKeys("^+S")

# Mostrar las propiedades de la sesion
win.TypeKeys("%{ENTER}")

win.TypeKeys("%{ENTER}")

from pywinauto import *
from pywinauto import application


office = "c:\\archivos de programa\microsoft office"
ppt = "\powerpnt.exe"

# Arrancar la aplicacion
app.start_(office + "\office11" + ppt);

win = app.window_(title_re  = ".*Microsoft PowerPoint.*")

# Seleccionar todo para que al pasar las transparencias en modo presentacion se pase #

tambien en la vista de diseño
win.TypeKeys ("%ES")

# Arrancar la presentacion
win.TypeKeys("{F5}")

if __name__ == "__main__":
    funcion()