GitHub PullRequestReviewCommentEvent at 2014-10-10 08:05:27
Repository: Perl-Training
Actor: dickyince
Payload: {"action":"created","comment":{"url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/comments/18692481","id":18692481,"diff_hunk":"@@ -0,0 +1,20 @@\n+#!/usr/bin/perl\n+\n+use strict;\n+use warnings;\n+use v5.10.1;\n+\n+# Parse date, react to weekdays\n+\n+my @weekdays = qw( Monday Tuesday Wednesday Thursday Friday );\n+my @weekends = qw( Saturday Sunday );\n+\n+# Why bother parsing date's output when you can just\n+# tell it what you want?\n+given ( qx { date +%A } ) {\n+  chomp;\n+  when ( @weekdays ) { print \"Get to work!\\n\" }\n+  when ( @weekends ) { print \"Go play!\\n\" }\n+  default { print \"No day?! Better start drinking!\\n\" }","path":"chapter16/ajd/exercise3.pl","position":18,"original_position":18,"commit_id":"95f8ed947120e8bad5a23a1d5c32a4a2ecace896","original_commit_id":"95f8ed947120e8bad5a23a1d5c32a4a2ecace896","user":{"login":"dickyince","id":1965885,"avatar_url":"https://avatars.githubusercontent.com/u/1965885?v=2","gravatar_id":"","url":"https://api.github.com/users/dickyince","html_url":"https://github.com/dickyince","followers_url":"https://api.github.com/users/dickyince/followers","following_url":"https://api.github.com/users/dickyince/following{/other_user}","gists_url":"https://api.github.com/users/dickyince/gists{/gist_id}","starred_url":"https://api.github.com/users/dickyince/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/dickyince/subscriptions","organizations_url":"https://api.github.com/users/dickyince/orgs","repos_url":"https://api.github.com/users/dickyince/repos","events_url":"https://api.github.com/users/dickyince/events{/privacy}","received_events_url":"https://api.github.com/users/dickyince/received_events","type":"User","site_admin":false},"body":"Good plan","created_at":"2014-10-10T08:05:27Z","updated_at":"2014-10-10T08:05:27Z","html_url":"https://github.com/SandyThomson/Perl-Training/pull/101#discussion_r18692481","pull_request_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101","_links":{"self":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/comments/18692481"},"html":{"href":"https://github.com/SandyThomson/Perl-Training/pull/101#discussion_r18692481"},"pull_request":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101"}}},"pull_request":{"url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101","id":22196432,"html_url":"https://github.com/SandyThomson/Perl-Training/pull/101","diff_url":"https://github.com/SandyThomson/Perl-Training/pull/101.diff","patch_url":"https://github.com/SandyThomson/Perl-Training/pull/101.patch","issue_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/101","number":101,"state":"open","locked":false,"title":"Ajd chapter16","user":{"login":"alexdeas","id":154288,"avatar_url":"https://avatars.githubusercontent.com/u/154288?v=2","gravatar_id":"","url":"https://api.github.com/users/alexdeas","html_url":"https://github.com/alexdeas","followers_url":"https://api.github.com/users/alexdeas/followers","following_url":"https://api.github.com/users/alexdeas/following{/other_user}","gists_url":"https://api.github.com/users/alexdeas/gists{/gist_id}","starred_url":"https://api.github.com/users/alexdeas/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/alexdeas/subscriptions","organizations_url":"https://api.github.com/users/alexdeas/orgs","repos_url":"https://api.github.com/users/alexdeas/repos","events_url":"https://api.github.com/users/alexdeas/events{/privacy}","received_events_url":"https://api.github.com/users/alexdeas/received_events","type":"User","site_admin":false},"body":"Chapter 16","created_at":"2014-10-03T10:34:49Z","updated_at":"2014-10-10T08:05:27Z","closed_at":null,"merged_at":null,"merge_commit_sha":"98edd7d85da811168085d3849639fdb11de8fada","assignee":null,"milestone":null,"commits_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101/commits","review_comments_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101/comments","review_comment_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/comments/{number}","comments_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/101/comments","statuses_url":"https://api.github.com/repos/SandyThomson/Perl-Training/statuses/95f8ed947120e8bad5a23a1d5c32a4a2ecace896","head":{"label":"SandyThomson:ajd_chapter16","ref":"ajd_chapter16","sha":"95f8ed947120e8bad5a23a1d5c32a4a2ecace896","user":{"login":"SandyThomson","id":7848639,"avatar_url":"https://avatars.githubusercontent.com/u/7848639?v=2","gravatar_id":"","url":"https://api.github.com/users/SandyThomson","html_url":"https://github.com/SandyThomson","followers_url":"https://api.github.com/users/SandyThomson/followers","following_url":"https://api.github.com/users/SandyThomson/following{/other_user}","gists_url":"https://api.github.com/users/SandyThomson/gists{/gist_id}","starred_url":"https://api.github.com/users/SandyThomson/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/SandyThomson/subscriptions","organizations_url":"https://api.github.com/users/SandyThomson/orgs","repos_url":"https://api.github.com/users/SandyThomson/repos","events_url":"https://api.github.com/users/SandyThomson/events{/privacy}","received_events_url":"https://api.github.com/users/SandyThomson/received_events","type":"User","site_admin":false},"repo":{"id":20683185,"name":"Perl-Training","full_name":"SandyThomson/Perl-Training","owner":{"login":"SandyThomson","id":7848639,"avatar_url":"https://avatars.githubusercontent.com/u/7848639?v=2","gravatar_id":"","url":"https://api.github.com/users/SandyThomson","html_url":"https://github.com/SandyThomson","followers_url":"https://api.github.com/users/SandyThomson/followers","following_url":"https://api.github.com/users/SandyThomson/following{/other_user}","gists_url":"https://api.github.com/users/SandyThomson/gists{/gist_id}","starred_url":"https://api.github.com/users/SandyThomson/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/SandyThomson/subscriptions","organizations_url":"https://api.github.com/users/SandyThomson/orgs","repos_url":"https://api.github.com/users/SandyThomson/repos","events_url":"https://api.github.com/users/SandyThomson/events{/privacy}","received_events_url":"https://api.github.com/users/SandyThomson/received_events","type":"User","site_admin":false},"private":false,"html_url":"https://github.com/SandyThomson/Perl-Training","description":"Corresponds with the Learning Perl O'Reilly book","fork":false,"url":"https://api.github.com/repos/SandyThomson/Perl-Training","forks_url":"https://api.github.com/repos/SandyThomson/Perl-Training/forks","keys_url":"https://api.github.com/repos/SandyThomson/Perl-Training/keys{/key_id}","collaborators_url":"https://api.github.com/repos/SandyThomson/Perl-Training/collaborators{/collaborator}","teams_url":"https://api.github.com/repos/SandyThomson/Perl-Training/teams","hooks_url":"https://api.github.com/repos/SandyThomson/Perl-Training/hooks","issue_events_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/events{/number}","events_url":"https://api.github.com/repos/SandyThomson/Perl-Training/events","assignees_url":"https://api.github.com/repos/SandyThomson/Perl-Training/assignees{/user}","branches_url":"https://api.github.com/repos/SandyThomson/Perl-Training/branches{/branch}","tags_url":"https://api.github.com/repos/SandyThomson/Perl-Training/tags","blobs_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/blobs{/sha}","git_tags_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/tags{/sha}","git_refs_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/refs{/sha}","trees_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/trees{/sha}","statuses_url":"https://api.github.com/repos/SandyThomson/Perl-Training/statuses/{sha}","languages_url":"https://api.github.com/repos/SandyThomson/Perl-Training/languages","stargazers_url":"https://api.github.com/repos/SandyThomson/Perl-Training/stargazers","contributors_url":"https://api.github.com/repos/SandyThomson/Perl-Training/contributors","subscribers_url":"https://api.github.com/repos/SandyThomson/Perl-Training/subscribers","subscription_url":"https://api.github.com/repos/SandyThomson/Perl-Training/subscription","commits_url":"https://api.github.com/repos/SandyThomson/Perl-Training/commits{/sha}","git_commits_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/commits{/sha}","comments_url":"https://api.github.com/repos/SandyThomson/Perl-Training/comments{/number}","issue_comment_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/comments/{number}","contents_url":"https://api.github.com/repos/SandyThomson/Perl-Training/contents/{+path}","compare_url":"https://api.github.com/repos/SandyThomson/Perl-Training/compare/{base}...{head}","merges_url":"https://api.github.com/repos/SandyThomson/Perl-Training/merges","archive_url":"https://api.github.com/repos/SandyThomson/Perl-Training/{archive_format}{/ref}","downloads_url":"https://api.github.com/repos/SandyThomson/Perl-Training/downloads","issues_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues{/number}","pulls_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls{/number}","milestones_url":"https://api.github.com/repos/SandyThomson/Perl-Training/milestones{/number}","notifications_url":"https://api.github.com/repos/SandyThomson/Perl-Training/notifications{?since,all,participating}","labels_url":"https://api.github.com/repos/SandyThomson/Perl-Training/labels{/name}","releases_url":"https://api.github.com/repos/SandyThomson/Perl-Training/releases{/id}","created_at":"2014-06-10T11:45:33Z","updated_at":"2014-09-05T09:39:09Z","pushed_at":"2014-10-09T23:25:50Z","git_url":"git://github.com/SandyThomson/Perl-Training.git","ssh_url":"git@github.com:SandyThomson/Perl-Training.git","clone_url":"https://github.com/SandyThomson/Perl-Training.git","svn_url":"https://github.com/SandyThomson/Perl-Training","homepage":null,"size":4276,"stargazers_count":0,"watchers_count":0,"language":"Perl","has_issues":true,"has_downloads":true,"has_wiki":true,"has_pages":false,"forks_count":0,"mirror_url":null,"open_issues_count":8,"forks":0,"open_issues":8,"watchers":0,"default_branch":"master"}},"base":{"label":"SandyThomson:master","ref":"master","sha":"d3486caceb9aecb12cd3e17a906f9e454006f0d1","user":{"login":"SandyThomson","id":7848639,"avatar_url":"https://avatars.githubusercontent.com/u/7848639?v=2","gravatar_id":"","url":"https://api.github.com/users/SandyThomson","html_url":"https://github.com/SandyThomson","followers_url":"https://api.github.com/users/SandyThomson/followers","following_url":"https://api.github.com/users/SandyThomson/following{/other_user}","gists_url":"https://api.github.com/users/SandyThomson/gists{/gist_id}","starred_url":"https://api.github.com/users/SandyThomson/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/SandyThomson/subscriptions","organizations_url":"https://api.github.com/users/SandyThomson/orgs","repos_url":"https://api.github.com/users/SandyThomson/repos","events_url":"https://api.github.com/users/SandyThomson/events{/privacy}","received_events_url":"https://api.github.com/users/SandyThomson/received_events","type":"User","site_admin":false},"repo":{"id":20683185,"name":"Perl-Training","full_name":"SandyThomson/Perl-Training","owner":{"login":"SandyThomson","id":7848639,"avatar_url":"https://avatars.githubusercontent.com/u/7848639?v=2","gravatar_id":"","url":"https://api.github.com/users/SandyThomson","html_url":"https://github.com/SandyThomson","followers_url":"https://api.github.com/users/SandyThomson/followers","following_url":"https://api.github.com/users/SandyThomson/following{/other_user}","gists_url":"https://api.github.com/users/SandyThomson/gists{/gist_id}","starred_url":"https://api.github.com/users/SandyThomson/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/SandyThomson/subscriptions","organizations_url":"https://api.github.com/users/SandyThomson/orgs","repos_url":"https://api.github.com/users/SandyThomson/repos","events_url":"https://api.github.com/users/SandyThomson/events{/privacy}","received_events_url":"https://api.github.com/users/SandyThomson/received_events","type":"User","site_admin":false},"private":false,"html_url":"https://github.com/SandyThomson/Perl-Training","description":"Corresponds with the Learning Perl O'Reilly book","fork":false,"url":"https://api.github.com/repos/SandyThomson/Perl-Training","forks_url":"https://api.github.com/repos/SandyThomson/Perl-Training/forks","keys_url":"https://api.github.com/repos/SandyThomson/Perl-Training/keys{/key_id}","collaborators_url":"https://api.github.com/repos/SandyThomson/Perl-Training/collaborators{/collaborator}","teams_url":"https://api.github.com/repos/SandyThomson/Perl-Training/teams","hooks_url":"https://api.github.com/repos/SandyThomson/Perl-Training/hooks","issue_events_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/events{/number}","events_url":"https://api.github.com/repos/SandyThomson/Perl-Training/events","assignees_url":"https://api.github.com/repos/SandyThomson/Perl-Training/assignees{/user}","branches_url":"https://api.github.com/repos/SandyThomson/Perl-Training/branches{/branch}","tags_url":"https://api.github.com/repos/SandyThomson/Perl-Training/tags","blobs_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/blobs{/sha}","git_tags_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/tags{/sha}","git_refs_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/refs{/sha}","trees_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/trees{/sha}","statuses_url":"https://api.github.com/repos/SandyThomson/Perl-Training/statuses/{sha}","languages_url":"https://api.github.com/repos/SandyThomson/Perl-Training/languages","stargazers_url":"https://api.github.com/repos/SandyThomson/Perl-Training/stargazers","contributors_url":"https://api.github.com/repos/SandyThomson/Perl-Training/contributors","subscribers_url":"https://api.github.com/repos/SandyThomson/Perl-Training/subscribers","subscription_url":"https://api.github.com/repos/SandyThomson/Perl-Training/subscription","commits_url":"https://api.github.com/repos/SandyThomson/Perl-Training/commits{/sha}","git_commits_url":"https://api.github.com/repos/SandyThomson/Perl-Training/git/commits{/sha}","comments_url":"https://api.github.com/repos/SandyThomson/Perl-Training/comments{/number}","issue_comment_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/comments/{number}","contents_url":"https://api.github.com/repos/SandyThomson/Perl-Training/contents/{+path}","compare_url":"https://api.github.com/repos/SandyThomson/Perl-Training/compare/{base}...{head}","merges_url":"https://api.github.com/repos/SandyThomson/Perl-Training/merges","archive_url":"https://api.github.com/repos/SandyThomson/Perl-Training/{archive_format}{/ref}","downloads_url":"https://api.github.com/repos/SandyThomson/Perl-Training/downloads","issues_url":"https://api.github.com/repos/SandyThomson/Perl-Training/issues{/number}","pulls_url":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls{/number}","milestones_url":"https://api.github.com/repos/SandyThomson/Perl-Training/milestones{/number}","notifications_url":"https://api.github.com/repos/SandyThomson/Perl-Training/notifications{?since,all,participating}","labels_url":"https://api.github.com/repos/SandyThomson/Perl-Training/labels{/name}","releases_url":"https://api.github.com/repos/SandyThomson/Perl-Training/releases{/id}","created_at":"2014-06-10T11:45:33Z","updated_at":"2014-09-05T09:39:09Z","pushed_at":"2014-10-09T23:25:50Z","git_url":"git://github.com/SandyThomson/Perl-Training.git","ssh_url":"git@github.com:SandyThomson/Perl-Training.git","clone_url":"https://github.com/SandyThomson/Perl-Training.git","svn_url":"https://github.com/SandyThomson/Perl-Training","homepage":null,"size":4276,"stargazers_count":0,"watchers_count":0,"language":"Perl","has_issues":true,"has_downloads":true,"has_wiki":true,"has_pages":false,"forks_count":0,"mirror_url":null,"open_issues_count":8,"forks":0,"open_issues":8,"watchers":0,"default_branch":"master"}},"_links":{"self":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101"},"html":{"href":"https://github.com/SandyThomson/Perl-Training/pull/101"},"issue":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/101"},"comments":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/issues/101/comments"},"review_comments":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101/comments"},"review_comment":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/comments/{number}"},"commits":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/pulls/101/commits"},"statuses":{"href":"https://api.github.com/repos/SandyThomson/Perl-Training/statuses/95f8ed947120e8bad5a23a1d5c32a4a2ecace896"}}}}