acotie

<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" styleName="plain" layout="absolute" xmlns:components="components.*" 
	width="829" height="529" pageTitle="Flex Basicサンプル：カスタムMXMLコンポーネント(MXML Components)">

	<components:comp1 id="comp1" y="51" dispString="{comp2.textinput1.text}" />
	<components:comp2 id="comp2" x="408" y="51" />
	
	<mx:ApplicationControlBar x="10" y="0" width="100%">
		<mx:Label text="メインアプリケーション" fontSize="16" />
	</mx:ApplicationControlBar> 

acotie

if has("gui_running")
  set fuoptions=maxvert,maxhorz
  au GUIEnter * set fullscreen
endif

acotie

if has('gui_macvim')
    set showtabline=2	" タブを常に表示
    set imdisable	" IMを無効化
    set transparency=10	" 透明度を指定
    set antialias
    set guifont=Monaco:h14
    colorscheme macvim
endif

acotie

<cffunction name="QueryToStruct" access="private" returntype="struct" output="no" hint="I convert a row of a query to a struct.">
        <cfargument name="query" type="query" required="yes">
        <cfargument name="rownum" type="numeric" default="1">

        <cfset var result = StructNew()>

        <cfloop index="col" list="#query.ColumnList#">
                <cfset result[col] = query[col][rownum]>
        </cfloop>

acotie

<mx:Script>
<![CDATA[
	import flash.net.*;
	public function openNewWindow(event:MouseEvent):void {
	var u:URLRequest = new URLRequest("http://www.adobe.com/flex");
	navigateToURL(u,"_self");
	}
]]>
</mx:Script>

acotie

   <cffunction name="QueryToStructArray" access="private" returntype="array" output="no" hint="convert to Array of  query to  Struct.">
        <cfargument name="query" type="query" required="yes">
        <cfargument name="rownum" type="numeric" default="1">

        <cfset var local = StructNew()>
        <cfset local.result  = ArrayNew(1)>
           
        <cfif arguments.query.RecordCount gte 1>
       
            <cfloop index="local.i" from="1" to="#arguments.query.RecordCount#">

acotie

<cffunction name="query2array" access="public" output="false" returntype="array" displayname="query2array" hint="query2array (Values only)">
    <cfargument name="Querys" type="query" required="yes" />
    <cfset var aResults = arrayNew(1)>
                                                                                
    <cfloop from="1" to="#arguments.Querys.recordCount#" index="i">
        <cfloop list="#arguments.Querys.columnList#" index="columnName">
            <cfset aResults[i] = arguments.Querys[columnName][i]>
        </cfloop>
    </cfloop>
                                                                                

acotie

<cfscript>
objDate     = createobject("java", "java.util.Date");
objCalendar = createobject("java", "java.util.Calendar");

//theDate = now();
//calendar.set(datepart("yyyy",theDate),datepart("m",theDate),datepart("d",theDate),datepart("h",theDate),datepart("n",theDate),datepart("s",theDate));		
</cfscript>

<cfdump var="#objDate#">
<cfdump var="#objCalendar#">

acotie

sudo port -v selfupdate
sudo port -v sync 

sudo port install wget tree proctools git-core
sudo port install nkf
sudo port install subversion
sudo port install vim
sudo port install emacs
sudo port install ImageMagick +lcms +jpeg2
sudo port install graphviz

acotie

#! /usr/bin/perl
use common::sense;
use Benchmark qw/cmpthese/;
use Perl6::Say;

say $^V;

my $datetime = '20101028120000';
cmpthese(1000000, {
    unpack => sub {