ºÇ½ª¹¹¿·¡§ maenotti_10 2011ǯ12·î15Æü(ÌÚ) 03:01:57ÍúÎò
my $friends = eval { $t->followers_ids() };
if ( $friends ) {
¡¡¡¡print Dumper $friends;
¡¡¡¡my $ids = $friends->{'ids'};
¡¡¡¡print "ttt:" . $ids->[0] . "\n";
¡¡¡¡print utf8::is_utf8($friends->{'ids'}) ? 'flagged' : 'no flag';
}
if ( $friends ) {
¡¡¡¡print Dumper $friends;
¡¡¡¡my $ids = $friends->{'ids'};
¡¡¡¡print "ttt:" . $ids->[0] . "\n";
¡¡¡¡print utf8::is_utf8($friends->{'ids'}) ? 'flagged' : 'no flag';
}
- ¥«¥Æ¥´¥ê¡§
- ¥Ñ¥½¥³¥ó
- ¥×¥í¥°¥é¥ß¥ó¥°
¥³¥á¥ó¥È¤ò¤«¤¯