如何在Net :: RawIP中指定數據包數據？

Question

據CPAN的文檔，我可以用下面的代碼創建一個原始數據包：

use Net::RawIP; 
    $n = Net::RawIP->new({ 
         ip => { 
           saddr => 'my.target.lan', 
           daddr => 'my.target.lan', 
           }, 
         }); 
         tcp => { 
           source => 139, 
           dest => 139, 
           psh => 1, 
           syn => 1, 
           }, 
         }); 
    $n->send; 

但我在哪裏申報，數據包包含數據？

我可以用另一個模塊發送數據包嗎？

Answer 1

既然你發送tcp包你需要的單證說指定：

$n = Net::RawIP->new({ 
    ip => { 
    saddr => 'my.target.lan', 
    daddr => 'my.target.lan', 
    }, 
    tcp => { 
    source => 139, 
    dest => 139, 
    psh => 1, 
    syn => 1, 
    data => $your_data 
    }, 
});