Drkcore

19072012 life

Facebookってそんなに魅力的なのかね？

ビジネスシーンを謳歌しているナウでヤングなお爺の皆さん達の間でFacebookが人気らしくて、商工会議所とか主催するFacebook関連のセミナー真っ盛りらしいんだけど。

というのは前振りで、僕自身はFacebook好きじゃないしあんま使わないし、さらに誰かが薦めていたから商品を買ったという経験がない（twitterとかblogでは多々ある）のでそれってなんでかなーと考えてみた。

結論はFacebookは強連結すぎるだった。

僕が思うに、Facebookは一度つながった関係性をより強固にするのが特徴であって、「twitterのようにフォローリムーブお気軽に」みたいな雰囲気じゃなくて、一度つながったら切りにくい関係が築かれますよね。だからこそコネクトしたくせに近況を見せないオプションが用意されてるわけだし。

まぁ実社会をネットワークに投影しただけだからしょうがないのかもしれないけど。

で、疑問なのはそういう強連結のネットワークってのは「まずは初期状態としてつながってないとその先の強固な関係性が築けないのでは？」なんてあたりで、それってB2C的にどうなの？と。

知らないオッサンのアイコンの中小企業の友達申請（地域のつながりからかな？）とか、まず間違いなく問答無用で弾くでしょ？その後、もしtwitterでフォローされたとしても、あーあいつかとか言いながらブロックするでしょ流れ作業的に。もう、「Facebookのせいで潜在的な顧客の可能性を無くしたね、気軽に友達申請したせいで」みたいな。

何が言いたいかというと、Facebookは重要なんだろうけど、それは顧客との関係性がちょっとでもできた状態から効率的に強固にしていけるからであって、新規な潜在顧客との関係をつなぐツールにはならないんじゃないの？と。

そこに期待すんのかね？

19072012 life

ラーメン屋の看板娘が経営コンサルタントと手を組んだら

読み物としては面白かったけど、タイトル狙いすぎじゃないのか？

「ラーメン屋の娘がコンサルに立て直しをお願いしました」

ってのが正しいので、GOALにあやかってRAMENとかコンサルのほうが潔い気もするけど。

ラーメン屋の看板娘が経営コンサルタントと手を組んだら
木村康宏
幻冬舎 / 1365円 ( 2011-08-25 )

ハッピーエンドなストーリーものを読むのが好きな人にはイイかも。

個人的にはコンサルに頼むシリーズだったら、ラーメンを題材に取る必要があるのか？とも思ったんだが著者がラーメンフリークらしいので、逆にリアリティがあったのかなぁと思った。

個人的には「激農村の元看板娘のおばあちゃんがコンサルトと手を組んだら」とかいうタイトルで6次産業にチャレンジするネタとかだったら嬉しいかな。

まぁ、だれも結果出してないからね（ラーメンネタは安心して読める）。

19072012 Haskell

MaybeのmplusはPerlのor(||)みたいなもんか

pleacの7.3を解いた

その後環境変数HOMEとLOGDIRを||で繋ぎたいなぁと思ったけど>>=は失敗を運ぶから使えないよなぁと思っていたらmplusがあったかと。

import Data.List.Split
import Control.Applicative
import Control.Monad
import Text.Regex
import System.Environment

getpwnam username = do
  passwds <- map (splitOn ":") <$> lines <$> readFile "/etc/passwd" 
  return (filter (\line -> (line!!0)==username) passwds)

main :: IO ()
main = do
  (path:_) <- getArgs
  case matchRegexAll (mkRegex "^~([^/]*)") path of
    Nothing -> putStrLn path
    Just (_,uhome,subdir,cs) -> 
        if length cs == 1 && length (cs!!0) /= 0
        then do
          dir <- getpwnam (cs!!0) 
          if (length dir) == 1 
          then putStrLn $ ((dir!!0)!!5) ++ subdir
          else putStrLn $ "Error: " ++ uhome ++ " not found"
        else do
          homedir <- lookup "HOME" <$> getEnvironment
          logdir <- lookup "LOGDIR" <$> getEnvironment
          case homedir `mplus` logdir of
            Just home -> putStrLn $ home ++ subdir
            Nothing -> putStrLn "Error: Env[HOME] not found"

これでHOMEが見つかればその後のLOGDIRは無視するし、見つからなければ評価される。

さらにliftM2で書きなおした

else do
   result <- liftM2 mplus (lookup "HOME" <$> getEnvironment) (lookup "LOGDIR" <$> getEnvironment)
   case result of
      Just home -> putStrLn $ home ++ subdir
      Nothing -> putStrLn "Error: Env[HOME] not found"

19072012 life

ウェブ文章術他

時間があったので流し読み

零細企業のホームページが繁盛店に化けた理由（ワケ）
望月　聡
技術評論社 / 1554円 ( 2011-06-08 )

amazonの書評の長文、ただの応援メッセージじゃないか？とちょっとステマ臭いのいくつか混じってんなというのはおいといて、マーケとか接客の本ですね。

検索上位と売上は連動しない
クリックするとお客が逃げてしまう

二番目の理由から、縦長ページを推していて制作実績にも縦長ページが多かったのでなるほどなぁと思った。なんであんな読みにくい広告みたいな体裁のページが存在するんだろうと思っていたので、参考になった。Web解析とかみると遷移率とか考えるけど、そういうのをすっ飛ばしてもっとシンプルに訴求してんのね。

でも縦長ページはスマホで見る気にはならんでしょね

お客様から選ばれるウェブ文章術
平野友朗
日本実業出版社 / 1680円 ( 2011-11-19 )

ウェブサイトを中心にすえて、facebookやtwitterのようなメディアはそれを補完するような位置づけで。っていう全体的な戦略に閑する入門書かな。

文章は読むヒトが知りたいと思うことを先回りして書け
抽象的な質問は避ける

読んで面白いとか役に立つのは多分後者なんだろうけど、新しい発見があった（縦長ページの秘密）のは前者だった。

18072012 Haskell

Haskellで例外を受け取る

IOの例外をキャッチしたくてはまった。

import System.Environment
import Control.Exception
import Prelude hiding (catch)
import System.Exit

main = do
  (file:_) <- getArgs
  catch (putStr =<< readFile file) $ \e -> return (e::SomeException) >> print ("Error on reading file: " ++ file)

-- main = do
--   (file:_) <- getArgs
--   catch (putStr =<< readFile file) $ \_ -> print ("Error on reading file: " ++ file)