/TextRepDefinitions.ahk
AutoHotKey | 86 lines | 47 code | 21 blank | 18 comment | 4 complexity | dd0a466e01febae52bf15617cfce8414 MD5 | raw file
Possible License(s): Apache-2.0
- #SingleInstance force
- #Hotstring *
- ;; Perl list available DBI drivers
- ::,,lsdbi::perl -MDBI -e 'print join("\n", sort(DBI->available_drivers)) . "\n"'`n
- ;; Dojo show the version of dojo
- ::,,dv::
- ReadFromEvernote("dojo version")
- return
- ;; encode to base64
- ::,,e64::
- InputBox, str, Enter a string, String to encode,,,,,,,,%clipboard%
- if str {
- SendInput perl -MMIME::Base64=encode_base64 -e "print encode_base64('%str%') . \"\n\""
- }
- return
- ;; decode from base64
- ::,,d64::
- InputBox, str, Enter a string, String to decode,,,,,,,,%clipboard%
- if str {
- SendInput perl -MMIME::Base64 -e "print decode_base64('%str%') . \"\n\""
- }
- return
- ;; PHP default value
- ::,,phpdv::
- InputBox, varname, Variable Name, Variable Name
- if varname {
- InputBox, defvalue, Default Value, Default Value,,,,,,,,false
- if defvalue {
- SendInput $%varname% = (isset($%varname%) ? $%varname% : "%defvalue%");
- }
- }
- return
- ;; Zend PHP ZF1 inline scripts
- ::,,inline::
- SendInput $scripts = $this->view->inlineScript();
- SendInput $scripts->appendFile("/js/" . JS_SRC . "/app/scriptname.js");
- return
- ;; Zend PHP log info
- ::zinfo::Zend_Registry`:`:get("log")->info("");{Left}{Left}{Left}
- ;; Zend PHP log warn
- ::zwarn::Zend_Registry`:`:get("log")->warn("");{Left}{Left}{Left}
- ;; Zend PHP log debug
- ::zdebug::Zend_Registry`:`:get("log")->debug("");{Left}{Left}{Left}
- ;; Zend PHP log trace
- ::ztrace::Zend_Registry`:`:get("log")->trace("");{Left}{Left}{Left}
- ;; Zend PHP log exception
- ::zexception::Zend_Registry`:`:get("log")->exception("", Zend_Log`:`:CRIT);{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}
- ;; Zend PHP log err
- ::zerr::Zend_Registry`:`:get("log")->err("");{Left}{Left}{Left}
- ;; Zend PHP log log
- ::zlog::Zend_Registry`:`:get("log")->log("", Zend_Log`:`:INFO);{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}{Left}
- ;; Zend PHP log info
- ::zinfo::Zend_Registry`:`:get("log")->info("");{Left}{Left}{Left}
- ;; date in YYYY-mm-dd format
- ::,,date::
- SendInput %A_YYYY%-%A_MM%-%A_DD%
- return
- ;; time in HH::MM::SS format
- ::,,time::
- SendInput %A_Hour%:%A_Min%:%A_Sec%
- return
- ;; Perl - file age in seconds
- ::,,fileage::my $secs = (stat($filename))[9];
- ;; Perl - start a new module
- ::,,newpm::h2xs -P -AXc -n