| top10Salaries :: FilePath -> IO () | |
| top10Salaries path = do | |
| Just (h, t) <- uncons . T.lines <$> T.readFile path | |
| let | |
| split = T.splitOn "," | |
| Just ind = elemIndex "Salary" $ split h | |
| top10 :: [Int] = t | |
| & map (\s -> read $ T.unpack $ split s !! ind) | |
| & sortBy (flip compare) | |
| & take 10 |
PLEASE SCROLL DOWN AND READ THE COMMENTS FOR A MORE UP TO DATE WAY (AND EASIER) TO DO THIS
When using Homebrew (http://brew.sh) and searching formulas or pull requests you may get the dreaded error message: Github API Rate limit exceeded
Let's fix that! (yeah!)
PLEASE SCROLL DOWN AND READ THE COMMENTS FOR A MORE UP TO DATE WAY (AND EASIER) TO DO THIS
| # get reference to the running iTunes | |
| $itunes = New-Object -ComObject iTunes.application | |
| # get all tracks in the entire library | |
| $allTracks = $itunes.LibraryPlaylist.Tracks | |
| # find the entries that are no longer on disk | |
| # NOTE: the API returns the location as null for those, so we check for | |
| # that instead of doing our own filtering based on test-path or similar | |
| $deadEntries = $allTracks | ?{ $_.Location -eq $null } |
| /* | |
| * Updated to use the function-based method described in http://www.phpied.com/social-button-bffs/ | |
| * Better handling of scripts without supplied ids. | |
| * | |
| * N.B. Be sure to include Google Analytics's _gaq and Facebook's fbAsyncInit prior to this function. | |
| */ | |
| (function(doc, script) { | |
| var js, | |
| fjs = doc.getElementsByTagName(script)[0], |
| <?php | |
| /** | |
| * Array to Text Table Generation Class | |
| * | |
| * @author Tony Landis <[email protected]> | |
| * @link http://www.tonylandis.com/ | |
| * @copyright Copyright (C) 2006-2009 Tony Landis | |
| * @license http://www.opensource.org/licenses/bsd-license.php | |
| */ | |
| class ArrayToTextTable |