- 憒雿餉衣摮詨振銝璅How to Think Like a Computer Scientist (銝剛陌)
- 臭砌舐 Python 撌亙瑟賂拙 Python 摮貉梯仿
- 銝剛陌
- 餉血隞暻潔臭蝟餃Python蝔撘隤閮摮豢蝡嚗閰行靘蝯西隞亦陛柴渲死孵摮貊蝔撘隤閮嚗脰鈭閫擃餉西敺雿
–
–
PHP 瑼獢
霈瑼:
1.fopen
蝭靘:
<?php $handle = fopen("open_file.txt", "r"); if( $handle === FALSE) { echo "Open File Fail" . "<br>"; } else { echo "Open File Success" . "<br>"; while (!feof($handle)) { $current_line = fgets($handle); echo $current_line . "<br>"; } } ?>
2.file_get_contents
蝭靘:
<?php $handle = file_get_contents('open_file.txt'); echo $handle; ?>
=========================================================
撖急:
1.fwrite
<?php $handle = fopen('open_file.txt', 'w'); fwrite($handle, "test1"); fclose($fp); ?>
ps:fwrite 舀銵摮,憒閬銵敹銝 \n
2.file_put_contents
<?php $handle = 'open_file.txt'; $current_line = "line1\n"; file_put_contents($handle, $current_line); ?>
source: PHP:瑼獢 @ 銝憭憭W劂銝 :: 摰a PIXNET ::
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | #!/usr/bin/env perl # helloworld.pl # # Created by Chun-Ting Liu on 2009-10-28 require 5.008008; use warnings; use strict; use Tk; my $mw = MainWindow->new; #撱箇銝閬蝒 $mw->title("Hello World"); #寡閬蝒璅憿摮嚗交摰閮剔箸嚗擐摮瘥芸憭批神嚗title method銝臬閬雿瘥頛憟賜 $mw->Button(-text => "Done!", -command => sub { exit })->pack(); #撱箇銝撖怨Done!Button widget嚗暺敺瑁 exit MainLoop; #憪GUI鈭隞嗉 |
Y揣Perl銝 -1祇舐洵銝嚗隞蝝遁erl璁餈啜
Y揣Perl銝 -2祇舐洵鈭嚗隞蝝遁erl蝪∪株
Y揣Perl銝 -3祇舐洵銝嚗隞蝝遁erl摮蝚虫葡霈
Y揣Perl銝 -4祇舐洵嚗隞蝝孵蝚虫葡霈撠蝯
Y揣Perl銝 -5祇舐洵鈭嚗銝蝡航perl銝剔蝞蝚嚗銝蝭箇洵銝畾蛛雓蝞銵蝞蝚佗瘥頛蝞蝚血頛舫蝞蝚艾
Y揣Perl銝 -6祇舐洵剝嚗銝蝡航perl銝剔蝞蝚
Y揣Perl銝 -7祇舐洵銝嚗銝蝡航perl銝剔蝞蝚血芸蝝
Y揣Perl銝 -8祇舐洵恍嚗銝蝡航perl銝剔批嗥瑽
Y揣Perl銝 -9祇舐洵銋嚗銝蝡航perl銝剔批嗥瑽
Y揣Perl銝 – 10
Y揣Perl銝 – 11
Y揣Perl銝 – 12
1. $_ $ARG嚗撣詨虜臭閮剛 2. @_ @ARG嚗摮靘蝔貉” 3. {row.content} $PROGRAM_NAME嚗祉摨摮 4. @ARGV 祉摨賭誘銵貉” 5. $" $LIST_SEPARATOR嚗貊扳圈撘摮蝚虫葡銝剜函蝚佗 閮剔箇征 6. $, $OFS嚗$OUTPUT_FIELD_SEPARATOR嚗冽print頛詨箏畾萄蝚佗 喃print隤乩葉券典銋函暻澆嚗閮剔箇 7. $ $ORS嚗$OUTPUT_RECORD_SEPARATOR嚗冽print頛詨箄蝚佗 喃print隤亦怠偏瘛餃暻潘閮剔箇 8. $/ $RS嚗$INPUT_RECORD_SEPARATOR嚗頛詨亥蝚佗寡鈭readline嚗 <FH>chomp撠潑銵瘜嚗閮剔箸銵蝚 9. $. $NR嚗$INPUT_LINE_NUMBER嚗敺霈銵(瘜冽銵璁敹萄航 鋡8寡) 10. $| $AUTOFLUSH嚗$OUTPUT_AUTOFLUSH嚗頛詨箇楨銵嚗閮剔0嚗喲 11. $$ $PID嚗$PROCESS_ID嚗祈單祉脩(PID) 12. $! $ERRNO嚗$OS_ERROR嚗銝銝甈∠頂蝯梯矽券航炊 13. $@ $EVAL_ERROR嚗銝銝甈eval雿航炊 14. $^I $INPLACE_EDIT嚗曉渡楊頛舐隞賣隞嗆游 15. %ENV 嗅啣霈 16. 甇銵券撘賊撟曉 |<-($`)->|<-($&)->|<-($')->| / ------- mmmmmmmm ++++++++/ => 甇銵券撘(瘜冽嚗蝛箸潔隞銵典祕蝛箸) | |寥典| 0 ($-[0]) ($+[0]) 17. $^O 雿蝟餌絞蝔晞 use English; print $OSNAME; use Config; print $Config{'osname'};
via Perl撣貉寞
舐撘銝餉舐其蝺渡 Perl 嚗賡W臬嗆活
踝
頛詨乩 Flickr 抒Y雯嚗靘踵箸蝡璅憿a蝯蝬脣雿蝔晞璅蝐歹銝血丘SSHTML蝣潔葉
祈 WWW::Mechanize 璅∠嚗雿W靘蝺函Ⅳ憟賢嚗芸末寧 system call cURL 靘血甇閬銵函內撘其遢蝧餅賊曄函啁賬
銝銝畾萇格撠望舀孵神臭誑芸潔 blogger 銝
Screenshot:
嚗隞 http://www.flickr.com/photos/lauct/3701237852/ 箔嚗
ps. 撖怎敺嚗嗅祕銝憭芸末曆靘 XD
FlickrFilter銝頛嚗Flickr2bps (189)
蝜潛梯 »
啣