After going through number of online Perl conference videos, its evident that language still got lot to offer than what people explored so far.
Joining the bandwagon back!!!
Find files on solaris
Find all the files under /u* which are 30 days old and greater than 1gb
find /u* -type f -mtime +30 -size +1024000 | xargs ls -ltr | awk -F" " '{print $5 " " $9}' | sort -r -n | awk -F" " '{print $2}' | xargs du -h | less
Putty and Plink command line options
Putty can be used as remote ssh client tool.
However today I learn few tricks on it.
It can be used as command line tool to execute script on remote server.
command prompt > putty.exe -t -ssh -l user -pw passwd -m C:\Users\irfan\Documents\run.txt host
*Replace user, passwd and host with actuals.
Carate run.txt file in your documents directory and enter few commands in it.
In this case I have C:\Users\irfan\Documents\run.txt with date and ls commands.
Above command will open putty application, logged into host based on credentials to execute commands from run.txt file.
But it will not return anything back to command prompt.
So what should be I doing to return the output back to command prompt
command prompt > plink.exe -l user -pw passwd -m C:\Users\irfan\Documents\run.txt host
*Replace user, passwd and host with actuals.
This command will return the output to your command prompt.
Enjoy!
RTC or Rational Team Concert
An integrated development environment used to track down task progress. There is eclipse based client as well as web based client (i.e. Jazz).
RTC tightly coupled with build and source control, it gives rich flexibly to navigate well.
I am using current setup for one of my client which has SCRUM process template.
The current setup has work item linkage in following manner.
- Epic
- Story
- Task
- Story
Epic is the business requirement for the given functionality.
Story will be further granular details for the epic.
Task will be set of single or multiple work items put down together to implement the given Story.
Source Control
I have been told that it’s Build Forge which has been configured with RTC for this project.
I didn’t know about build forge tool before but virtually it doesn’t make any difference which RTC GUI.
I have working experience of Subversion and Perforce, its steep learning curve with RTC GUI to manage source control.
Streams are the way to manage different projects between one or more teams.
The Financial Information eXchange (FIX) Protocol
It is a series of messaging specifications for the electronic communication of trade-related messages.
Example of FIX message (Tag Value pair)
8=FIX.4.1^9=0235^35=D^34=10^43=N^49=VENDOR^50=CUSTOME^56=BROKER^52=19980930-09:25:28^1=XQCCFUND^11=10^21=1^55=EK^48=277461109^22=1^54=1^38=10000^40=2^44=76.750000^59=0^10=165
Fix message divided into 3 main category
- Header
- Fix version
- sender
- receiver
- type of message
- Body
- order type
- symbol
- qty
- price
- Footer
- checksum – used to avoid the transmission error
Let us now understand above example FIX message in detail
(^) caret is a field delimiter
Referring to FIX specification at http://fixprotocol.org/FIXimate3.0/?language=en&version=FIX.4.1
8=FIX.4.1
| Tag | Description | Valid values |
| 8 | Identifies beginning of new message and protocol version. ALWAYS FIRST FIELD IN MESSAGE. (Always unencrypted) |
9=0235
| Tag | Description | Valid values |
| 9 | Message length, in bytes, forward to the CheckSum field. ALWAYS SECOND FIELD IN MESSAGE. (Always unencrypted) |
35=D
| Tag | Description | Valid values | ||||||||||||||||||||
| 35 | Defines message type. ALWAYS THIRD FIELD IN MESSAGE. (Always unencrypted)Note: A “U” as the first character in the MsgType field (i.e. U1, U2, etc) indicates that the message format is privately defined between the sender and receiver. |
|
34=10
| Tag | Description | Valid values |
| 34 | Integer message sequence number. |
43=N
| Tag | Description | Valid values | ||||||||||
| 43 | Indicates possible retransmission of message with this sequence number |
|
49=VENDOR
| Tag | Description | Added | Depr. | Enums from tag | Valid values |
| 49 | Assigned value used to identify firm sending message. | FIX.2.7 |
50=CUSTOME
| Tag | Field Name | Data Type | Union Datatype | Description | Added | Depr. | Enums from tag | Valid values |
56=BROKER
| Tag | Description | Valid values |
| 56 | Assigned value used to identify receiving firm. |
52=19980930-09:25:28
| Tag | Description | Valid values |
| 52 | Time of message transmission (always expressed in GMT) |
1=XQCCFUND
| Tag | Description | Valid values |
| 1 | Account mnemonic as agreed between broker and institution. |
11=10
| Tag | Description | Valid values |
| 11 | Unique identifier for Order as assigned by institution. Uniqueness must be guaranteed within a single trading day. Firms which electronically submit multi-day orders should consider embedding a date within the ClOrdID field to assure uniqueness across days. |
21=1
| Tag | Description | Valid values | ||||||||||
| 21 | Instructions for order handling on Broker trading floor |
|
55=EK
| Tag | Description | Enums from tag | Valid values |
| 55 | Ticker symbol |
48=277461109
| Tag | Description | Enums from tag | Valid values |
| 48 | CUSIP or other alternate security identifier |
22=1
| Tag | Description | Valid values | ||||||||||
| 22 | Identifies class of alternative SecurityID |
|
54=1
| Tag | Description | Valid values | ||||||||||
| 54 | Side of order |
|
38=10000
| Tag | Description | Added | Valid values |
| 38 | Number of shares ordered | FIX.2.7 |
40=2
| Tag | Description | Valid values | |||||||||||||||
| 40 | Order type. |
|
44=76.750000
| Tag | Description | Valid values |
| 44 | Price per share |
59=0
| Tag | Description | Valid values | ||||||||||
| 59 | Specifies how long the order remains in effect. Absence of this field is interpreted as DAY. |
|
10=165
| Tag | Description | Valid values |
| 10 | Three byte, simple checksum (see Appendix B for description). ALWAYS LAST FIELD IN RECORD; i.e. serves, with the trailing <SOH>, as the end-of-record delimiter. Always defined as three characters. (Always unencrypted) |
Different message type
Admin Messages
- Login
- Logout
- Heartbeat
Application Message
- New order
- Order cancel
- Execution
- All business related messages
Do come back to see more updates on this article.
Fixed Income
It provides a return in the form of fixed periodic payments and the eventual return of principal at maturity. Unlike a variable-income security, where payments change based on some underlying measure such as short-term interest rates, the payments of a fixed-income security are known in advance.
Example of a fixed-income security would be a 5% fixed-rate government bond where a $10,000 investment would result in an annual $500 payment until maturity when the investor would receive the $10,000 back. Generally, these types of assets offer a lower return on investment because they guarantee income.
Bonds
It is a debt security similar to an informal debt instrument. When you purchase a bond you are lending a money to that entity who is issuers. In returns for the loan, the issuers promises to pay specified rate of interest during the life of the bond and to repay the face value of the bond when it matures or comes due.
Query Twitter data using Perl
Search Twitter using Perl module Net::Twitter
Pre-requisites
I strongly recommend to read below url before playing around this example
Streaming API Concepts
Net::Twitter – A perl interface to the Twitter API
- https://metacpan.org/module/Net::Twitter
Streaming API Response Codes
#!/usr/bin/perl -w
use Net::Twitter;
use Scalar::Util 'blessed';
my $nt = Net::Twitter->new(
traits => [qw/OAuth API::REST API::Search/],
consumer_key => "PZBzeiUFkzZ0vF4bNY88rQ",
consumer_secret => "2VjWny5UTCk4eIde6GBUFdRsCwiOX6jIgQCPmT6VA",
access_token => "349126638-MZ0fCAYRQnyarDjsph5sXtOZBF0h6TjbXjxUXHGn",
access_token_secret => "r0SyKoqU91uMksfXD8mTPOI9k0h1UkOkb5rH1LVJh8",
ssl => '1',
decode_html_entities => '1',
);
eval {
my $response = $nt->search("India");
print
$response->{'results'}->[$_]->{'created_at'}," - ",
$response->{'results'}->[$_]->{'from_user'}," - ",
$response->{'results'}->[$_]->{'text'}, "\n\n" foreach (1..10);
};
if ( my $err = $@ ) {
print "12345";
die $@ unless blessed $err && $err->isa('Net::Twitter::Error');
}
It will search “India” in latest tweets
Output format
Date Time – User – Tweet
Mon, 07 May 2012 07:27:37 +0000 - kpark_kunal - @iSaakshi I doubt!india has very concentrated oil importers! Saudi, Iran,kuwait, Nigeria contributing more than 80%(source:PPAC) @EquateallMon, 07 May 2012 07:27:37 +0000 - kpark_kunal - @iSaakshi I doubt!india has very concentrated oil importers! Saudi, Iran,kuwait, Nigeria contributing more than 80%(source:PPAC) @Equateall Mon, 07 May 2012 07:27:36 +0000 - goonergurl20 - @ReiceCookieCook Pls sign this petition & help us #IndianGooners to get ESPN to telecast WBA vs. Arsenal LIVE in India! http://t.co/fq8qcKbQ Mon, 07 May 2012 07:27:34 +0000 - WildNavigator - @sophontrackhave it before going to sleep. In India we call this grandmothers medicinal therapies - it works wonders
Have fun!
Upgrade Perl modules using cpan autobundle
It’s become bi weekly task to keep updated your Perl distro.
To achieve it I use following commands
perl -MCPAN -e shell cpan> autobundleAbove command will generate a snapshot pm file. This file will include list of modules require upgrade.
Example
Snapshot_2012_05_01_01.pmYou can recheck the file and list of module with respective version. You have a facility to remove any of unwanted packages to your distro.
Once done the modification of the file you save it.
Now run below command
cpan> install Bundle::Snapshot_2012_05_01_01This command will take care of installation of all these module incorporated in Snapshot_2012_05_01_00 file.
Bingo thats all! WeW
Perl6 rakodu on Mac OS X version 10.7.3
- download rakudo perl6 src from git
https://github.com/downloads/rakudo/star/rakudo-star-2012.04.tar.gz - perl Configure.pl –prefix=<DIR> –gen-nqp –gen-parrot
<DIR> directory where you want to push the binaries of perl6
It will avoid clash with existing Perl version running in system
After command executed successfully check prefix dir, it should show following dir’s
drwxr-xr-x 3 root staff 102 Apr 29 23:06 share
drwxr-xr-x 3 root staff 102 Apr 29 23:06 include
drwxr-xr-x 6 root staff 204 Apr 29 23:06 lib
drwxr-xr-x 3 root staff 102 Apr 29 23:06 src
drwxr-xr-x 14 root staff 476 Apr 29 23:08 bin - make
- make rakudo-testAll tests successful.
Files=23, Tests=227, 15 wallclock secs ( 0.09 usr 0.06 sys + 11.54 cusr 2.86 csys = 14.55 CPU)
Result: PASS - make rakudo-spectest
- make install
