|
|
|
|
  有啥简单办法给日期排序么？ - bdcon [ 2005-03-29 16:21 | 427 byte(s)]
Re: 有啥简单办法给日期排序么？ - laserhenry [ 2005-04-04 23:18 | 172 byte(s)]
Re: 有啥简单办法给日期排序么？ - Viperii [ 2005-03-29 20:43 | 259 byte(s)]
|
|
|
|
[Original]
[Print]
[Top]
|
2005-01-03
2004-09-08
2004-10-11
2005-01-20
:
:
当然。。这些东西我存在了hash中
$test{$date}{$product}=100
我使用
for my $date(sort {$test{$b}<=>$test{$a}} keys %test)
{
print $date.
;
}
不过好像不起作用。。。
不知道为什么。。
|
|
|
----
no name noow
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
安装CPAN的Date::Simple
use Date::Simple;
my $date = Date::Simple->new('2005-01-03');
这样就可以用"<"或">"操作符来比较日期，你写个冒泡程序就比较出来了.
|
|
|
----
Where is the RED pill? I want OUT!
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
直接用
for my $date (sort keys %test){...}
就可以了。你实际是想对key进行排序，如果用$test{$a}，就是对value进行排序，这样，在这里实际上是在对一个哈希表的引用进行排序，当然不能得到想要的结果。
仔细看看 perldoc -f sort
|
|
|
----
It's better to burn out than to fade away...
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
装一个pgsql的DBD和相关的DBI，
把数据倒进去，注意日期字段用DATE类型，
然后执行查询：
select * from table order by date_column.
|
|
|
----
|
|
[Original]
[Print]
[Top]
|
|
|
声明: 本页内容为中国Linux论坛的内容镜像，文章的版权以及其他所有的相关权利属于中国Linux论坛和相应文章的作者，如果转载，请注明文章来源及相关版权信息。