mattintosh note

Hello Raspberry Pi!

🍎 Google Chrome で開いãĻいるã‚ŋブぎ URL とã‚ŋイトãƒĢからã‚ĸãƒŗã‚Ģãƒŧテキ゚トをäŊœæˆã™ã‚‹

Google Chrome

Google Chrome から開いãĻいるīŧˆã‚ĸクテã‚ŖブãĒīŧ‰ã‚ŋブから URL とã‚ŋイトãƒĢを取垗し、<a rel="external" href="URL">TITLE</a> ãĒ HTML をį”Ÿæˆã—ãĻクãƒĒップボãƒŧドへã‚ŗピãƒŧしぞす。


゚クãƒĒプト全äŊ“

tell application "Google Chrome" to set L to {URL of active tab of window 1, title of active tab of window 1}
set item 2 of L to do shell script "LANG=ja_JP.UTF-8 /usr/bin/ruby -ne 'require \"cgi\"; puts CGI.escapeHTML($_)' <<<" & quoted form of item 2 of L
set the clipboard to "<a rel=\"external\" href=\"" & item 1 of L & "\" title=\"" & item 2 of L & "\">" & item 2 of L & "</a>"

1行į›Ž

晎通ãĢæ›¸ãã¨ä¸‹č¨˜ãŽã‚ˆã†ãĒã‚ŗãƒŧドãĢãĒるかと思いぞすが Google Chrome は1åēĻしかå‘ŧばãĒいぎでãƒĒ゚トをäŊŋãŖãĻ1čĄŒã§æ¸ˆãžã›ãĻいぞす。Google Chrome.sdef をčĒ­ã‚€ã¨ã‚ŋãƒ–ãŽæƒ…å ąã¯ tab {n} で拞えるようãĒ気がするんですが active tab じゃãĒいと取垗できãĒいようでâ€Ļ。

tell application "Google Chrome"
    set theURL to URL of active tab of window 1
    set theTITLE to title of active tab of window 1
end tell

2行į›Ž

取垗したã‚ŋイトãƒĢã‹ã‚‰ã‚¨ã‚šã‚ąãƒŧプがåŋ…čĻãĢãĒる文字を Ruby をäŊŋãŖãĻ変換しãĻいぞす。Ruby ゚クãƒĒプト部分ãĢį›´æŽĨ文字列を埋めčžŧんでしぞうとčĒ¤äŊœå‹•ã‚’čĩˇã“す可čƒŊ性があるため quoted form of 化したもぎをヒã‚ĸ゚トãƒĒãƒŗグをäŊŋãŖãĻ標æē–å…Ĩ力からčĒ­ãŋčžŧぞせぞす。AppleScript ぎ do shell script į’°åĸƒã§ã¯ã‚ˇã‚§ãƒĢぎ初期į’°åĸƒå¤‰æ•°ãŒã‚ŋãƒŧミナãƒĢį­‰ã¨ã¯į•°ãĒるため LANG=ja_JP.UTF-8 や Ruby ぎ -Ku ã‚Ēãƒ—ã‚ˇãƒ§ãƒŗを指厚しãĒいとエナãƒŧãĢãĒることがありぞす。ã‚ŋイトãƒĢãĢæ”ščĄŒã‚ŗãƒŧドがå…ĨãŖãĻいることはぞずį„Ąã„と思うぎで -n ã‚Ēãƒ—ã‚ˇãƒ§ãƒŗはčĻã‚‰ãĒいかもしれぞせん。

LANG=ja_JP.UTF-8 /usr/bin/ruby -ne 'require "cgi"; puts CGI.escapeHTML($_)' <<<'TITLE OF ACTIVE TAB'

3行į›Ž

URL とã‚ŋイトãƒĢから HTML をį”Ÿæˆã—、クãƒĒップボãƒŧドへã‚ŗピãƒŧしãĻいぞす。

į”Ÿæˆäž‹

Yahoo! JAPAN ぎペãƒŧジからäģĨ下ぎã‚ŗãƒŧドがį”Ÿæˆã•ã‚Œãžã™ã€‚

<a rel="external" href="http://www.yahoo.co.jp/" title="Yahoo! JAPAN">Yahoo! JAPAN</a>

AppleScript: The Definitive Guide: Scripting and Automating Your Mac (Definitive Guides)

AppleScript: The Definitive Guide: Scripting and Automating Your Mac (Definitive Guides)

Learn AppleScript: The Comprehensive Guide to Scripting and Automation on Mac OS X (Learn Series)

Learn AppleScript: The Comprehensive Guide to Scripting and Automation on Mac OS X (Learn Series)