原创 [NPWP筆記]從管道中讀取數據

使用後綴“|”操作實現從標準輸入設備中讀取內容。   #!/usr/bin/perl use strict; my %who; open(WHOFH,"who |") or die "can not open who:$!"; while

原创 漢字數目與阿拉伯數字轉化之二

上一篇實現使用C++實現了漢字數目轉化爲阿拉伯數字的引擎,其接口僅能供c++語言使用,本文將在上一篇的基礎上,將其轉化爲c語言可以使用的動態鏈接庫,既可以供C++代碼使用,又可以供C源代碼使用,開發環境以VS2008爲例,其它編譯器的移植

原创 [NPWP筆記]Write a FTP client with two-process model

There are two process in this script,one for send FTP command,and another is for receiving FTP server response.   use s

原创 [NPWP筆記]多線程客戶端

多線程客戶端是對單線程客戶端的擴展,在原有的基礎之上使用了線程技術,SOCKET的創建與關閉都是在子線程中進行:子線程在創建時也創建一個SOCKET,在子線程退出時,將其關閉。這樣,在線程併發的時候,產生多個SOCKET同時連接服務器的情

原创 ACE操作ini配置文件

     配置文件(後綴爲.ini)的文件主要用作配置程序啓動時的一些參數配置,每一個配置行的格式爲: name=value name:配置參數名稱 value:配置參數的值=:配置分隔符   配置參數可以根據功能相關性對配置行進行分組,

原创 多線程Poco::Logger生成日誌

日誌函數在多線程的環境下應該可以進行同步處理,多個線程同時向同一個日誌文件進行日誌輸出時,每一次的日誌記錄應保持完整,即日誌功能實現了同步處理。下面的例子採用Poco的多線程編程,每次啓動200個子線程,各個子線程函數負責向日志文件中寫入

原创 Linux共享庫文件(so)用法

    JCConvert已經在Windows上可以工作,下一步我將在Linux平臺上實現這個功能。爲了保證對Linux系統so文件理解無誤,先在Linux平臺上創建一個so文件,並使用測試程序進行測試,其目的就是確認自己的理解是否正確。

原创 [NPWP筆記]multiplexed客戶端

使用multiplexed技術監聽STDIN的可讀數據,如果有數據可用,則將其讀入到緩存中,之後通過syswrite寫入到SOCKET。 use strict; use warnings; use IO::Socket; use IO::

原创 漢字數目與阿拉伯數字轉化之一

  本文定義了漢字數目(一百二十三)轉化爲阿拉伯數字(123)數據結構及函數定義,本文使用了C++ STL中的常用數據結構如集合(set)、映射(map)、向量(vector)和字符串(string)等,故提供的接口僅供C++開發人員使用

原创 使用Poco::Logger實現日誌功能

使用的Poco頭文件及其對應的命名空間   #include "Poco/FormattingChannel.h"#include "Poco/FileChannel.h"#include "Poco/PatternFormatter.h

原创 [NPWP筆記]多線程服務器

採用一個主線程負責接收來自客戶端的連接請求,對於每一個客戶端的請求,由以一個線程進行處理。這樣客戶的連接於客戶的事務處理分別在不同的線程,主線程創建完成事務處理線程之後,將不再對其進行任何控制。事務處理線程負責來自客戶端的請求,將接收到的

原创 [NPWP筆記]使用perl讀取文件

實現的功能很簡單,將文本文件中的內容逐行打印到屏幕。   #!/usr/bin/perl use 5.006; use strict; use warnings; use IO::File; my $file = shift; my $f

原创 [NPWP筆記]使用perl循環讀取標準輸入設備

本程序使用perl循環讀取標準輸入設備(STDIN),直到輸入的文本內容爲“quit”字符串;   use 5.006; use strict; use warnings; my $line; while(<>) {     chomp;

原创 ACE雙向鏈表用法

演示了ACE雙向鏈表與STD鏈表的用法 // EchoServer.cpp : 定義控制檯應用程序的入口點。 // #include "stdafx.h" #include "ace/Containers.h" #include "ace

原创 [NPWP筆記]Develop a multi-process server with perl

It is very simple tcp server which receive client request,and print it on STDOUT,for every connection,it fork a child s