geniustrader-devel — participate in geniustrader development, ask for help, suggest improvements, etc

[GT] patch for Finance::GeniusTrader::DB::HTTP

[Yen-Ming L. <le...@le...>]

Hi, GeniusTrader developers,

I found that in Finance::GeniusTrader::DB::HTTP, one of the loadtxt()
has a missing $header_line argument, so the following %fields will get
the wrong values.

Please see attachment for patch.

Thanks,
- leeym

[GT] Re: Re: data from finance.yahoo.com

[strangespider <str...@we...>]

Am Donnerstag 27 August 2009 schrieb Robert A. Schmied:
> str...@we... wrote:
> > Hi,
> > 
> > I try to work with datas from yahoo, but the problem is that the data are in
> > the "wrong" order.
> > 
> > Date,Open,High,Low,Close,Volume,Adj Close
> > 2009-08-19,986.88,999.61,980.62,996.46,4257000000,996.46
> > 2009-08-18,980.62,991.20,980.62,989.67,4198970000,989.67
> > 2009-08-17,998.18,998.18,978.51,979.73,4088570000,979.73
> > 2009-08-14,1012.23,1012.60,994.60,1004.09,4940750000,1004.09
> > 2009-08-13,1005.86,1013.14,1000.82,1012.73,5250660000,1012.73
> > 2009-08-12,994.00,1012.78,993.36,1005.81,5498170000,1005.81
> > 2009-08-11,1005.77,1005.77,992.40,994.35,5773160000,994.35
> > 2009-08-10,1008.89,1010.12,1000.99,1007.10,5406080000,1007.10
> > 2009-08-07,999.83,1018.00,999.83,1010.48,6827089600,1010.48
> > 
> > 
> > The Example data provided by geniustrader are sorted ascending regarding date.
> > 
> > So is there a option in the configuration file of geniustrader to work with
> > data sorted descending regarding date?
> > 
> > 
> > Best regards
> > 
> 
> strangespider
> 
> you don't indicate how you are fetching the data from yahoo ...
> 
> i believe, but did not test and verify, that the gt db methods in module
> GT::DB::HTTP do what you want, provided you configure things correctly
> in your $HOME/.gt/options file. if you try this module and find that it
> fails to provide the prices data in date descending order please let me know.
> 
> also note that this gt db module tends to abuse the yahoo prices servers
> by aging out the downloaded data after a small hand full of hours, so it
> is recommended and encouraged that you setup and maintain a local prices
> data store. this can be done with beancounter running a sql based datastore
> or via multiple text files. there are gt db interface modules that provide
> access, but gt itself has no provisions to maintain a local prices datastore.
> you can also take a look at erik colsons' Finance::QuoteDB on cpan.
> 
> 
> aloha
> 
> ras
> 
> 


Sorry, I forgot to explain how I get the data. I wrote a script, that fetches for a few symbols the belonging csv file. Either the complete date range or just the missing days to the last update. So I get the following data, e.g.:
http://ichart.finance.yahoo.com/table.csv?s=IBM


Date,Open,High,Low,Close,Volume,Adj Close
2009-08-26,118.64,119.85,117.51,119.47,4515500,119.47
2009-08-25,119.25,120.15,118.71,118.83,4652200,118.83
2009-08-24,119.92,120.88,119.10,119.32,6363400,119.32
2009-08-21,119.65,120.01,118.55,119.90,8306800,119.90
2009-08-20,118.44,119.41,118.10,118.95,4841700,118.95
2009-08-19,116.36,118.77,116.12,118.57,4837900,118.57
...



My ~/.gt/options

DB::module Text
DB::text::directory /home/user/quotes_eod_reversed
DB::text::marker ,
DB::text::format 0
DB::text::fields::datetime 0
DB::text::fields::open 1
DB::text::fields::high 2
...



At the moment I wrote a small bash script that "tac" the quotes, so I can use them in the right order.

#!/bin/bash

for file in quotes_eod/*
do
        quote=`basename $file`
        tac quotes_eod/$quote | sed '$d' > quotes_eod_reversed/$quote
done




As Yahoo provides free eod data sorted descending regarding date, it would be a nice feature to have a option like
DB::text::order 0
DB::text::order 1
with 0 ascending (default) and 1 descending.



Best regards

[GT] Re: data from finance.yahoo.com

[Robert A. S. <ra...@ac...>]

str...@we... wrote:
> Hi,
> 
> I try to work with datas from yahoo, but the problem is that the data are in
> the "wrong" order.
> 
> Date,Open,High,Low,Close,Volume,Adj Close
> 2009-08-19,986.88,999.61,980.62,996.46,4257000000,996.46
> 2009-08-18,980.62,991.20,980.62,989.67,4198970000,989.67
> 2009-08-17,998.18,998.18,978.51,979.73,4088570000,979.73
> 2009-08-14,1012.23,1012.60,994.60,1004.09,4940750000,1004.09
> 2009-08-13,1005.86,1013.14,1000.82,1012.73,5250660000,1012.73
> 2009-08-12,994.00,1012.78,993.36,1005.81,5498170000,1005.81
> 2009-08-11,1005.77,1005.77,992.40,994.35,5773160000,994.35
> 2009-08-10,1008.89,1010.12,1000.99,1007.10,5406080000,1007.10
> 2009-08-07,999.83,1018.00,999.83,1010.48,6827089600,1010.48
> 
> 
> The Example data provided by geniustrader are sorted ascending regarding date.
> 
> So is there a option in the configuration file of geniustrader to work with
> data sorted descending regarding date?
> 
> 
> Best regards
> 

strangespider

you don't indicate how you are fetching the data from yahoo ...

i believe, but did not test and verify, that the gt db methods in module
GT::DB::HTTP do what you want, provided you configure things correctly
in your $HOME/.gt/options file. if you try this module and find that it
fails to provide the prices data in date descending order please let me know.

also note that this gt db module tends to abuse the yahoo prices servers
by aging out the downloaded data after a small hand full of hours, so it
is recommended and encouraged that you setup and maintain a local prices
data store. this can be done with beancounter running a sql based datastore
or via multiple text files. there are gt db interface modules that provide
access, but gt itself has no provisions to maintain a local prices datastore.
you can also take a look at erik colsons' Finance::QuoteDB on cpan.


aloha

ras

[GT] Re: data from finance.yahoo.com

[Gregory M. <gm...@pa...>]

On Wed, Aug 26, 2009 at 12:32:46PM +0200, str...@we... wrote:
> I try to work with datas from yahoo, but the problem is that the data are in
> the "wrong" order.
> 
> Date,Open,High,Low,Close,Volume,Adj Close
> 2009-08-19,986.88,999.61,980.62,996.46,4257000000,996.46
> 2009-08-18,980.62,991.20,980.62,989.67,4198970000,989.67
> 2009-08-17,998.18,998.18,978.51,979.73,4088570000,979.73
> 2009-08-14,1012.23,1012.60,994.60,1004.09,4940750000,1004.09
> 2009-08-13,1005.86,1013.14,1000.82,1012.73,5250660000,1012.73
> 2009-08-12,994.00,1012.78,993.36,1005.81,5498170000,1005.81
> 2009-08-11,1005.77,1005.77,992.40,994.35,5773160000,994.35
> 2009-08-10,1008.89,1010.12,1000.99,1007.10,5406080000,1007.10
> 2009-08-07,999.83,1018.00,999.83,1010.48,6827089600,1010.48
> 
> The Example data provided by geniustrader are sorted ascending regarding date.
> 
> So is there a option in the configuration file of geniustrader to work with
> data sorted descending regarding date?

No, but one could be added.

The DB module is responsible for providing sorted price data, but the
text file code expects pre-sorted data.  How are you generating this
price data?

If that's not an option, and if you're willing to put up with a
super-simple hack, you could force a sort after the load (with
associated runtime penalty) with this one-liner at the end of the
loadtxt() routine:


Index: GT/Prices.pm
===================================================================
--- GT/Prices.pm        (revision 699)
+++ GT/Prices.pm        (working copy)
@@ -391,6 +391,7 @@
        }
     }
     close FILE;
+    $self->sort();
 }
 
 =item C<< $p->savetxt("cotationsfile.txt") >>



-- 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Gregory H. Margo
gmargo at yahoo/com, gmail/com, pacbell/net; greg at margofamily/org

[GT] Re: Missing commits

[Thomas W. <we...@ms...>]

Gregory,

as I mentioned in an earlier thread, I can give you commit access to the
CPAN branch, just send me a note. Th.

Gregory Margo wrote:
> In recent weeks I've sent in three patches which, IMHO, should
> be applied to both the trunk and the CPAN branch.  Two have been
> partially commited and one not at all.  I respectfully request that
> the person(s) with commit power follow through with the commits.
> I don't want them to fall through the cracks.
>
> Apologies if the folks involved are simply on vacation or some such.
>
>   

[GT] Re: data from finance.yahoo.com

[Thomas W. <we...@ms...>]

Loading data into GT requires that the data be sorted in ascending order
of dates. So you would have to reorder this data. Your download script
should handle that, or you could use a database such as beancounter.... Th.

str...@we... wrote:
> Hi,
>
> I try to work with datas from yahoo, but the problem is that the data are in
> the "wrong" order.
>
> Date,Open,High,Low,Close,Volume,Adj Close
> 2009-08-19,986.88,999.61,980.62,996.46,4257000000,996.46
> 2009-08-18,980.62,991.20,980.62,989.67,4198970000,989.67
> 2009-08-17,998.18,998.18,978.51,979.73,4088570000,979.73
> 2009-08-14,1012.23,1012.60,994.60,1004.09,4940750000,1004.09
> 2009-08-13,1005.86,1013.14,1000.82,1012.73,5250660000,1012.73
> 2009-08-12,994.00,1012.78,993.36,1005.81,5498170000,1005.81
> 2009-08-11,1005.77,1005.77,992.40,994.35,5773160000,994.35
> 2009-08-10,1008.89,1010.12,1000.99,1007.10,5406080000,1007.10
> 2009-08-07,999.83,1018.00,999.83,1010.48,6827089600,1010.48
>
>
> The Example data provided by geniustrader are sorted ascending regarding date.
>
> So is there a option in the configuration file of geniustrader to work with
> data sorted descending regarding date?
>
>
> Best regards
>   

[GT] data from finance.yahoo.com

[<str...@we...>]

Hi,

I try to work with datas from yahoo, but the problem is that the data are in
the "wrong" order.

Date,Open,High,Low,Close,Volume,Adj Close
2009-08-19,986.88,999.61,980.62,996.46,4257000000,996.46
2009-08-18,980.62,991.20,980.62,989.67,4198970000,989.67
2009-08-17,998.18,998.18,978.51,979.73,4088570000,979.73
2009-08-14,1012.23,1012.60,994.60,1004.09,4940750000,1004.09
2009-08-13,1005.86,1013.14,1000.82,1012.73,5250660000,1012.73
2009-08-12,994.00,1012.78,993.36,1005.81,5498170000,1005.81
2009-08-11,1005.77,1005.77,992.40,994.35,5773160000,994.35
2009-08-10,1008.89,1010.12,1000.99,1007.10,5406080000,1007.10
2009-08-07,999.83,1018.00,999.83,1010.48,6827089600,1010.48


The Example data provided by geniustrader are sorted ascending regarding date.

So is there a option in the configuration file of geniustrader to work with
data sorted descending regarding date?


Best regards

[GT] RE: Re: best repository to start with

[flyingimmi ---- <fly...@li...>]

Hey, 

thanks a lot!
I actually got beancounter and GeniusTrader running and it wasn't even
as tough as I thought. :)
After some reading in the wiki, forum etc. I'm a little bit stuck.
I want to visualize signals in the .png output files but don't really 
know where to start...

As an example I would like to do the following:
"identify number 1 high" and put a "1" over the bar that make the high

Definition:
A number 1 high is created when a previous up-move has ended and prices
have begun to move down.

This is a very basic example just to see what needs to be done.

A short outline about what needs to be done or a hint where I can find such 
information would be wonderful.

regards
flyingimmi

 


> Date: Wed, 12 Aug 2009 22:28:10 +0200
> From: ec...@ec...
> To: de...@ge...
> Subject: [GT] Re: best repository to start with
> 
> On Wed, Aug 12, 2009 at 06:05:25PM +0200, flyingimmi ---- wrote:
> > Dear all,
> > 
> > I'm new to GeniusTrader and perl as well (just reading the camel book...).
> > Reading all this CPAN and different trunks  stuff  I don't really know
> > where to start.
> > I'm afraid to have a version that doesn't work in the future, or is out sync
> > with the tutorial / wiki information etc.
> > What would you recommend?
> > 
> > Thank's flyingimmi
> > 
> > ps. I using Ubuntu 9.04
> 
> Ehlo
> 
> The CPAN branch is alpha release. So that shouldn't be the one you should start on.
> You'd definitely best go with trunk for now. Once CPAN reaches a somehow well packaged and stable state, all you'd need to do is install it from CPAN and remove the old  GT directory from your system.
> 
> Your personal scripts will need few changes:
> - change the "use GT::" into "Finance::GeniusTrader"
> - remove all "use libs .."
> - change the path of the GT scripts you call.
> 
> That should be all changes needed.
> 
> regards
> --
> erik

_________________________________________________________________
http://redirect.gimas.net/?n=M0908axIE_MSN2
Surfen – optimiert für MSN.

[GT] Missing commits

[Gregory M. <gm...@pa...>]

In recent weeks I've sent in three patches which, IMHO, should
be applied to both the trunk and the CPAN branch.  Two have been
partially commited and one not at all.  I respectfully request that
the person(s) with commit power follow through with the commits.
I don't want them to fall through the cracks.

Apologies if the folks involved are simply on vacation or some such.


-------------------------------------------------------------------------
Scripts/graphic.pl (adding output filename option)
Submitted by myself to the mailing list on 2009-07-19.
http://www.geniustrader.org/lists/devel/msg03132.html (submission)
http://www.geniustrader.org/lists/devel/msg03257.html (commit on trunk)

Status (trunk): committed
Status (cpan) : missing

NOTE: on the trunk commit, ras added additional format changes
that probably should have been separate.


-------------------------------------------------------------------------
GT/Indicators/RSI.pm (correcting missing edge cases)
Submitted by myself to the mailing list on 2009-08-07.
http://www.geniustrader.org/lists/devel/msg03313.html

Status (trunk): missing
Status (cpan) : missing


-------------------------------------------------------------------------
Eval patch. (correcting eval success tests)
Submitted by myself to the mailing list on 2009-08-07.
http://www.geniustrader.org/lists/devel/msg03318.html (submission)
http://www.geniustrader.org/lists/devel/msg03319.html (commit on CPAN branch)

Status (trunk): missing
Status (cpan) : committed

-- 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Gregory H. Margo
gmargo at yahoo/com, gmail/com, pacbell/net; greg at margofamily/org

[GT] Re: best repository to start with

[Erik C. <ec...@ec...>]

On Wed, Aug 12, 2009 at 06:05:25PM +0200, flyingimmi ---- wrote:
> Dear all,
> 
> I'm new to GeniusTrader and perl as well (just reading the camel book...).
> Reading all this CPAN and different trunks  stuff  I don't really know
> where to start.
> I'm afraid to have a version that doesn't work in the future, or is out sync
> with the tutorial / wiki information etc.
> What would you recommend?
> 
> Thank's flyingimmi
> 
> ps. I using Ubuntu 9.04

Ehlo

The CPAN branch is alpha release. So that shouldn't be the one you should start on.
You'd definitely best go with trunk for now. Once CPAN reaches a somehow well packaged and stable state, all you'd need to do is install it from CPAN and remove the old  GT directory from your system.

Your personal scripts will need few changes:
- change the "use GT::" into "Finance::GeniusTrader"
- remove all "use libs .."
- change the path of the GT scripts you call.

That should be all changes needed.

regards
--
erik

[GT] best repository to start with

[flyingimmi ---- <fly...@li...>]

Dear all,

I'm new to GeniusTrader and perl as well (just reading the camel book...).
Reading all this CPAN and different trunks  stuff  I don't really know 
where to start.
I'm afraid to have a version that doesn't work in the future, or is out sync 
with the tutorial / wiki information etc.
What would you recommend?

Thank's flyingimmi

ps. I using Ubuntu 9.04





_________________________________________________________________
http://redirect.gimas.net/?n=M0908axHotmail2
Erster! Sommerfotos mit Hotmail versenden - 70% schneller!

[GT] HTML posters: Please post in plain text

[Gregory M. <gm...@pa...>]

On Sun, Aug 09, 2009 at 05:35:47PM -0500, Thomas Weigert wrote:
> <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
> <html>
> <head>
>   <meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
> </head>
> <body bgcolor="#ffffff" text="#000000">
> Dear all,<br>
> <br>


I respectfully request that messages be posted in either plain text,
or in plain text + HTML.  Not in HTML only.

For Thunderbird users, here's how to configure that:
http://kb.mozillazine.org/Plain_text_e-mail_%28Thunderbird%29#Send_both_plain_text_and_HTML

-- 
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Gregory H. Margo
gmargo at yahoo/com, gmail/com, pacbell/net; greg at margofamily/org

[GT] Temporary mirror for CPAN branch

[Thomas W. <we...@ms...>]

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
  <meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
Dear all,<br>
<br>
I have set up a mirror for the CPAN branch where I can give rights to
checkin for those who would like to be actively involved. Please let me
know if you need a password. We shall need to develop some kind of
community process so that we don't end up with chaos. <br>
<br>
The location is <br>
<br>
<a class="moz-txt-link-freetext" href="http://modeldrivenengineering.org/gt/CPAN/">http://modeldrivenengineering.org/gt/CPAN/</a><br>
<br>
you can also use https.<br>
<br>
There is also a trac associated with this, which can look into the svn
archive and associate tickets with it. I have not configured it with
login permissions, as I was not sure whether anybody would want to use
something like that. Let me know.<br>
<br>
This is only for the CPAN branch. Any other work should be performed as
usual against the standard archive.<br>
<br>
Cheers, Th.<br>
<br>
Thomas Weigert wrote:
<blockquote cite="mid:4A7...@ms..." type="cite">
  <pre wrap="">I'll have to experiment with that. The good thing is that there are not
that many people that can check in. So if I open up the synch site, I
think it is manageable, as most (all) checkins to the CPAN branch would
be there.... Th.

Erik Colson wrote:
  </pre>
  <blockquote type="cite">
    <pre wrap="">On 08 Aug 2009, at 23:04, Thomas Weigert wrote:

    </pre>
    <blockquote type="cite">
      <pre wrap="">I have an idea. I shall svnsynch the CPAN branch to a location where I
can control access. That way, I can ensure they are in synch but you
(and any others) can check in.

Give me a until the end of today to set this up. I need to test to make
sure that it goes smoothly into the gt site from the shadow
repository....
      </pre>
    </blockquote>
    <pre wrap="">Hi Thomas,

Really nice idea.
But won't that make conflicts if someone commits to the CPAN branch on
the main repo, and then somebody else commits to your repo ?
Or will you set up a sync cronjob which makes this fairly impossible
to occur ?

-- 
erik
    </pre>
  </blockquote>
  <pre wrap=""><!---->
  </pre>
</blockquote>
</body>
</html>

[GT] Re: Arithmetic within a system (which approach)

[Robert A. S. <ra...@ac...>]

Greg Jessup wrote:
> I am thinking about a system which looks for an overnight price gap. For
> instance
> Look for an x% gap up or down overnight, and if the gap exists open a long
> or short position.
> 
> The question is can you do something like this?
> {S:G:Above { S:G:Abs {  { I:G:PeriodAgo 1 {I:Prices CLOSE} } - {I:Prices
> OPEN} } * 100  } 5 }
> 
> Or is it best to create my own system like TTS.pm? Or something else?
> 
> Thanks,
> 
> Greg
> 

greg

to followup:

by default, any 'order' generated 'today' will be applied at the opening 'tomorrow'
(refer to my recent posting(s) regarding the hidden orderfactory in the backtest).
with sub-end-of-day data streams i don't know.

using end-of-day data there isn't any way to generate an order at the opening
'today' and apply it immediately (eod data 'todays' data isn't available until
after the close today). the best that can had, methinks, is an order generation
for a position at the closing price of the day on which the opening gap occurred
at the opening tomorrow.

i'm having a dejavu about this about now, you might want to browse the archives ...

also note that you will need to specify a specific orderfactory in order to set
the price point at which to accept the order and take a position. iirc the hidden
orderfactory will use the market open price on the day after the order.

if you want to 'experiment' with the strategy you can explore using the indicator
values that result from ../GT/Indicators/Cheating, but i've not looked at them for
a long time, they may be old and out of date.


ras

[GT] Re: Arithmetic within a system (which approach)

[Robert A. S. <ra...@ac...>]

Greg Jessup wrote:
> I am thinking about a system which looks for an overnight price gap. For
> instance
> Look for an x% gap up or down overnight, and if the gap exists open a long
> or short position.
> 
> The question is can you do something like this?
> {S:G:Above { S:G:Abs {  { I:G:PeriodAgo 1 {I:Prices CLOSE} } - {I:Prices
> OPEN} } * 100  } 5 }
> 
> Or is it best to create my own system like TTS.pm? Or something else?
> 
> Thanks,
> 
> Greg
> 


../GT/Signals/Prices/GapUp.pm
../GT/Signals/Prices/GapDown.pm


ras

[GT] Re: Re: Re: Re: Re: Re: Re: Re: Re: SVN Commit r698 - branches/CPAN/script

[Chia-liang K. <cl...@cl...>]

yes, and you probably know I need a new hobby :)

2009/8/8 Thomas Weigert <we...@ms...>:
> Chia Liang,
>
> are you the same Kao Chia Liang (高嘉良) who wrote svk?
>
> Th.
>
> Erik Colson wrote:
>>
>>
>> Hi Chia-Lang (or is Kao your first name?),
>>
>>
>

[GT] Re: Re: Re: Re: Re: Re: db-text.t test example

[Thomas W. <we...@ms...>]

I'll have to experiment with that. The good thing is that there are not
that many people that can check in. So if I open up the synch site, I
think it is manageable, as most (all) checkins to the CPAN branch would
be there.... Th.

Erik Colson wrote:
>
> On 08 Aug 2009, at 23:04, Thomas Weigert wrote:
>
>> I have an idea. I shall svnsynch the CPAN branch to a location where I
>> can control access. That way, I can ensure they are in synch but you
>> (and any others) can check in.
>>
>> Give me a until the end of today to set this up. I need to test to make
>> sure that it goes smoothly into the gt site from the shadow
>> repository....
>
> Hi Thomas,
>
> Really nice idea.
> But won't that make conflicts if someone commits to the CPAN branch on
> the main repo, and then somebody else commits to your repo ?
> Or will you set up a sync cronjob which makes this fairly impossible
> to occur ?
>
> -- 
> erik

[GT] Re: Re: Re: Re: Re: db-text.t test example

[Erik C. <ec...@ec...>]

On 08 Aug 2009, at 23:04, Thomas Weigert wrote:

> I have an idea. I shall svnsynch the CPAN branch to a location where I
> can control access. That way, I can ensure they are in synch but you
> (and any others) can check in.
>
> Give me a until the end of today to set this up. I need to test to  
> make
> sure that it goes smoothly into the gt site from the shadow  
> repository....

Hi Thomas,

Really nice idea.
But won't that make conflicts if someone commits to the CPAN branch on  
the main repo, and then somebody else commits to your repo ?
Or will you set up a sync cronjob which makes this fairly impossible  
to occur ?

--
erik

[GT] Re: Re: Re: Re: Re: Re: Re: Re: SVN Commit r698 - branches/CPAN/script

[Thomas W. <we...@ms...>]

Chia Liang,

are you the same Kao Chia Liang (高嘉良) who wrote svk?

Th.

Erik Colson wrote:
>
>
> Hi Chia-Lang (or is Kao your first name?),
>
>

[GT] Re: Re: Re: Re: db-text.t test example

[Thomas W. <we...@ms...>]

I have an idea. I shall svnsynch the CPAN branch to a location where I
can control access. That way, I can ensure they are in synch but you
(and any others) can check in.

Give me a until the end of today to set this up. I need to test to make
sure that it goes smoothly into the gt site from the shadow repository....

Th.

Erik Colson wrote:
>
> On 08 Aug 2009, at 21:59, Thomas Weigert wrote:
>
>> Yes, I agree but I do not have any way to give you access. I don't even
>> know who can (Robert?). Th.
>
> You need command-line access for this.
> So probably only the site owner can give commit rights.
>
> This kind of problems makes me think more and more to only use the
> github repo (which I neglected for a week). Then when I get access to
> CPAN branch I'll submit all patches at once keeping history on github.
> Or maybe I'll write a script to compare githubs' state with
> CPAN-branch on svn to keep in sync...
> Don't know yet, but I certainly won't work like this for another week...
> -- 
> erik

[GT] Re: Re: Re: db-text.t test example

[Erik C. <ec...@ec...>]

On 08 Aug 2009, at 21:59, Thomas Weigert wrote:

> Yes, I agree but I do not have any way to give you access. I don't  
> even
> know who can (Robert?). Th.

You need command-line access for this.
So probably only the site owner can give commit rights.

This kind of problems makes me think more and more to only use the  
github repo (which I neglected for a week). Then when I get access to  
CPAN branch I'll submit all patches at once keeping history on github.
Or maybe I'll write a script to compare githubs' state with CPAN- 
branch on svn to keep in sync...
Don't know yet, but I certainly won't work like this for another week...
--
erik

[GT] SVN Commit r699 - branches/CPAN/t

[GeniusTrader S. <ra...@ge...>]

Author: thomas
Date: 2009-08-08 22:27:33 +0200 (Sat, 08 Aug 2009)
New Revision: 699

Added:
   branches/CPAN/t/01-pod-coverage.t
   branches/CPAN/t/03-boilerplate.t
Removed:
   branches/CPAN/t/boilerplate.t
   branches/CPAN/t/pod-coverage.t
Log:
Rename standard tests.

Copied: branches/CPAN/t/01-pod-coverage.t (from rev 692, branches/CPAN/t/pod-coverage.t)
===================================================================
--- branches/CPAN/t/01-pod-coverage.t	                        (rev 0)
+++ branches/CPAN/t/01-pod-coverage.t	2009-08-08 20:27:33 UTC (rev 699)
@@ -0,0 +1,23 @@
+#!perl
+use strict;
+use warnings;
+use Test::More;
+
+# Only run this tests if environment var TEST_AUTHOR is set
+plan skip_all => 'Author test.  Set $ENV{TEST_AUTHOR} to true to run.'
+  if (not $ENV{TEST_AUTHOR}) ;
+
+# Ensure a recent version of Test::Pod::Coverage
+my $min_tpc = 1.08;
+eval "use Test::Pod::Coverage $min_tpc";
+plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
+    if $@;
+
+# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
+# but older versions don't recognize some common documentation styles
+my $min_pc = 0.18;
+eval "use Pod::Coverage $min_pc";
+plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
+    if $@;
+
+all_pod_coverage_ok();

Copied: branches/CPAN/t/03-boilerplate.t (from rev 691, branches/CPAN/t/boilerplate.t)
===================================================================
--- branches/CPAN/t/03-boilerplate.t	                        (rev 0)
+++ branches/CPAN/t/03-boilerplate.t	2009-08-08 20:27:33 UTC (rev 699)
@@ -0,0 +1,55 @@
+#!perl -T
+
+use strict;
+use warnings;
+use Test::More tests => 3;
+
+sub not_in_file_ok {
+    my ($filename, %regex) = @_;
+    open( my $fh, '<', $filename )
+        or die "couldn't open $filename for reading: $!";
+
+    my %violated;
+
+    while (my $line = <$fh>) {
+        while (my ($desc, $regex) = each %regex) {
+            if ($line =~ $regex) {
+                push @{$violated{$desc}||=[]}, $.;
+            }
+        }
+    }
+
+    if (%violated) {
+        fail("$filename contains boilerplate text");
+        diag "$_ appears on lines @{$violated{$_}}" for keys %violated;
+    } else {
+        pass("$filename contains no boilerplate text");
+    }
+}
+
+sub module_boilerplate_ok {
+    my ($module) = @_;
+    not_in_file_ok($module =>
+        'the great new $MODULENAME'   => qr/ - The great new /,
+        'boilerplate description'     => qr/Quick summary of what the module/,
+        'stub function definition'    => qr/function[12]/,
+    );
+}
+
+TODO: {
+  local $TODO = "Need to replace the boilerplate text";
+
+  not_in_file_ok(README =>
+    "The README is used..."       => qr/The README is used/,
+    "'version information here'"  => qr/to provide version information/,
+  );
+
+  not_in_file_ok(Changes =>
+    "placeholder date/time"       => qr(Date/time)
+  );
+
+  module_boilerplate_ok('lib/Finance/GeniusTrader.pm');
+
+
+}
+

Deleted: branches/CPAN/t/boilerplate.t
===================================================================
--- branches/CPAN/t/boilerplate.t	2009-08-08 01:35:44 UTC (rev 698)
+++ branches/CPAN/t/boilerplate.t	2009-08-08 20:27:33 UTC (rev 699)
@@ -1,55 +0,0 @@
-#!perl -T
-
-use strict;
-use warnings;
-use Test::More tests => 3;
-
-sub not_in_file_ok {
-    my ($filename, %regex) = @_;
-    open( my $fh, '<', $filename )
-        or die "couldn't open $filename for reading: $!";
-
-    my %violated;
-
-    while (my $line = <$fh>) {
-        while (my ($desc, $regex) = each %regex) {
-            if ($line =~ $regex) {
-                push @{$violated{$desc}||=[]}, $.;
-            }
-        }
-    }
-
-    if (%violated) {
-        fail("$filename contains boilerplate text");
-        diag "$_ appears on lines @{$violated{$_}}" for keys %violated;
-    } else {
-        pass("$filename contains no boilerplate text");
-    }
-}
-
-sub module_boilerplate_ok {
-    my ($module) = @_;
-    not_in_file_ok($module =>
-        'the great new $MODULENAME'   => qr/ - The great new /,
-        'boilerplate description'     => qr/Quick summary of what the module/,
-        'stub function definition'    => qr/function[12]/,
-    );
-}
-
-TODO: {
-  local $TODO = "Need to replace the boilerplate text";
-
-  not_in_file_ok(README =>
-    "The README is used..."       => qr/The README is used/,
-    "'version information here'"  => qr/to provide version information/,
-  );
-
-  not_in_file_ok(Changes =>
-    "placeholder date/time"       => qr(Date/time)
-  );
-
-  module_boilerplate_ok('lib/Finance/GeniusTrader.pm');
-
-
-}
-

Deleted: branches/CPAN/t/pod-coverage.t
===================================================================
--- branches/CPAN/t/pod-coverage.t	2009-08-08 01:35:44 UTC (rev 698)
+++ branches/CPAN/t/pod-coverage.t	2009-08-08 20:27:33 UTC (rev 699)
@@ -1,23 +0,0 @@
-#!perl
-use strict;
-use warnings;
-use Test::More;
-
-# Only run this tests if environment var TEST_AUTHOR is set
-plan skip_all => 'Author test.  Set $ENV{TEST_AUTHOR} to true to run.'
-  if (not $ENV{TEST_AUTHOR}) ;
-
-# Ensure a recent version of Test::Pod::Coverage
-my $min_tpc = 1.08;
-eval "use Test::Pod::Coverage $min_tpc";
-plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
-    if $@;
-
-# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
-# but older versions don't recognize some common documentation styles
-my $min_pc = 0.18;
-eval "use Pod::Coverage $min_pc";
-plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
-    if $@;
-
-all_pod_coverage_ok();

[GT] Re: Re: db-text.t test example

[Thomas W. <we...@ms...>]

I think the problem is partially that rename should not be done via
patches but via svn commands.So can you please send me just an email
with instructions when you want to rename, rather than producing a
patch? Thanks, Th.

Erik Colson wrote:
>
> On 07 Aug 2009, at 14:33, Erik Colson wrote:
>
>> Following patch shows how to write tests. Please apply to CPAN branch.
>>
>> -- 
>> erik
>> <0001-db-text.t-test-added-as-an-example-test.patch>
>
> Hi Thomas,
>
> For some weird reason this patch was not applied completely.
>
> 1. rename t/{pod-coverage.t => 01-pod-coverage.t} (76%)
> 2. create mode 100755 t/02-pod.t
> 3. rename t/{boilerplate.t => 03-boilerplate.t} (100%)
> 4. create mode 100644 t/04-critic.t
> 5. delete mode 100755 t/pod.t
>
> 1+3 were not applied
>
> the cause of this is probably that I'm working on a local repo and
> create commits which become patches I send to you and that you kindly
> apply to the central repo.

[GT] Re: Re: db-text.t test example

[Thomas W. <we...@ms...>]

Yes, I agree but I do not have any way to give you access. I don't even
know who can (Robert?). Th.

Erik Colson wrote:
> Would be much better if I could commit directly to the repo. It would
> certainly save me much time to check if everything is in sync with the
> svn repo.
>
>

[GT] Re: db-text.t test example

[Erik C. <ec...@ec...>]

On 07 Aug 2009, at 14:33, Erik Colson wrote:

> Following patch shows how to write tests. Please apply to CPAN branch.
>
> --
> erik
> <0001-db-text.t-test-added-as-an-example-test.patch>

Hi Thomas,

For some weird reason this patch was not applied completely.

1. rename t/{pod-coverage.t => 01-pod-coverage.t} (76%)
2. create mode 100755 t/02-pod.t
3. rename t/{boilerplate.t => 03-boilerplate.t} (100%)
4. create mode 100644 t/04-critic.t
5. delete mode 100755 t/pod.t

1+3 were not applied

the cause of this is probably that I'm working on a local repo and  
create commits which become patches I send to you and that you kindly  
apply to the central repo. Then I have a local repo which is out of  
sync and has to rebased to the revisions you apply.
Would be much better if I could commit directly to the repo. It would  
certainly save me much time to check if everything is in sync with the  
svn repo.

--
erik