Perl ã§'' 㨠1 == 0ã®åºå¥ã®ä»ãæ¹ã åã®ã¨ã³ããªã®ç¶ãã æ®éã®æåå''ã¨ãs/foo/bar/ããããã¯1 != 0ã®çµæã®ãããªbooleanãè¿ããçµæã®éããè¦ããã£ã¦ãã¨ã ã use B; sub SV_isPV { my $x = shift; my $flags = B::svref_2object(\$x)->FLAGS;; return (! ( $flags & 0x00010000 ) ) && ( $flags & 0x00040000 ); } ãããéãã¨ãåºå¥ãä»ãã ã«ãã´ãª éçº 2007å¹´12æ 7æ¥ 18:18 D | ããã°è¨äºã®URL | ã³ã¡ã³ã(0) | ãã©ãã¯ããã¯(0) |
{{#tags}}- {{label}}
{{/tags}}