perl php dump

最新推荐文章于 2021-03-25 14:56:11 发布

book2016

最新推荐文章于 2021-03-25 14:56:11 发布

阅读量786

点赞数

CC 4.0 BY-SA版权

分类专栏： perl php 文章标签： perl php string

本文链接：https://blog.youkuaiyun.com/zzz_781111/article/details/6160805

php 同时被 2 个专栏收录

63 篇文章

订阅专栏

perl

12 篇文章

订阅专栏

本文展示了使用Perl和PHP进行数组调试的方法。Perl示例通过定义月份缩写与数字的映射，并利用Data::Dump模块输出；PHP示例则定义了一个八挂对应的数组，并使用var_dump函数展示数组内容。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

调试函数比较
perl
#!/usr/bin/perl
use POSIX qw(strftime);
use Data::Dump qw(dump ddx);
my %MonthAbbr = ( "Jan"=>'01', "Feb"=>'02', "Mar"=>'03', "Apr"=>'04', "May"=>'05', "Jun"=>'06',"Jul"=>'07',"Aug"=>'08',"Sep"=>'09',"Oct"=>'10',"Nov"=>'11',"Dec"=>'12' );
dump(%MonthAbbr);
ddx(%MonthAbbr );

[root@localhost ~]# perl t.pl
(
"Sep",
"09",
"May",
"05",
"Jul",
"07",
"Jun",
"06",
"Jan",
"01",
"Nov",
11,
"Aug",
"08",
"Feb",
"02",
"Mar",
"03",
"Dec",
12,
"Apr",
"04",
"Oct",
10,
)
# t.pl:6: (
#   "Sep",
#   "09",
#   "May",
#   "05",
#   "Jul",
#   "07",
#   "Jun",
#   "06",
#   "Jan",
#   "01",
#   "Nov",
#   11,
#   "Aug",
#   "08",
#   "Feb",
#   "02",
#   "Mar",
#   "03",
#   "Dec",
#   12,
#   "Apr",
#   "04",
#   "Oct",
#   10,
# )

php

<?php
$my_8 = array(
'000' => '坤六断',
'001' => '震仰盂',
'100' => '艮覆碗',
'101' => '离中虚',
'010' => '坎中满',
'011' => '兑上缺',
'110' => '巽下断'
);
var_dump($my_8);
?>

array(7) {
["000"]=>
string(9) "坤六断"
["001"]=>
string(9) "震仰盂"
[100]=>
string(9) "艮覆碗"
[101]=>
string(9) "离中虚"
["010"]=>
string(9) "坎中满"
["011"]=>
string(9) "兑上缺"
[110]=>
string(9) "巽下断"
}